MacTech 1 to 12

home *** CD-ROM | disk | FTP | other *** search
/ MacTech 1 to 12 / MacTech-vol-1-12.toast / Source / MacTech® Magazine / Volume 02 - 1986 / 02.01 Jan 86.sit / 02.01 Jan 86 / asm / asm icon converter 2-1 / IconVert.ASM next >
MacBinary | 1985-10-14 | 14.3 KB | [TEXT/EDIT]
open in:
MacOS 8.1 extracted |
Win98 extracted |
DOS extracted
browse contents |
view JSON data |
view as text

This file was processed as: MacBinary (archive/macBinary).
Confidence	Program	Detection	Match Type	Support
`10%`	dexvert	MacBinary `(archive/macBinary)`	fallback	Supported
`1%`	dexvert	Text File `(text/txt)`	fallback	Supported
`100%`	file	MacBinary II, inited, Mon Oct 14 00:32:48 1985, modified Mon Oct 14 00:32:48 1985, creator Macintosh Edit, type ASCII, 13833 bytes "IconVert.ASM" , at 0x3689 490 bytes resource	default (weak)
`99%`	file	data	default
`74%`	TrID	Macintosh plain text (MacBinary)	default
`25%`	TrID	MacBinary 2	default (weak)
`100%`	siegfried	fmt/1762 MacBinary (II)	default
`100%`	lsar	MacBinary	default
id metadata
key	value
macFileType	`[TEXT]`
macFileCreator	`[EDIT]`
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0c 49 63 6f 6e 56 65 | 72 74 2e 41 53 4d 00 00 |..IconVe|rt.ASM..|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 45 44 49 | 54 01 00 00 00 00 00 00 |.TEXTEDI|T.......|
|00000050| 00 00 00 00 00 36 09 00 | 00 01 ea 99 d6 47 f0 99 |.....6..|.....G..|
|00000060| d6 47 f0 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.G......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 0d b3 00 00 |........|........|
|00000080| 3b 09 09 09 09 d7 0d 3b | 09 09 09 49 63 6f 6e 20 |;......;|...Icon |
|00000090| 43 6f 6e 76 65 72 74 65 | 72 20 33 2e 30 0d 3b 09 |Converte|r 3.0.;.|
|000000a0| 09 20 20 43 6f 70 79 72 | 69 67 68 74 20 31 39 38 |.  Copyr|ight 198|
|000000b0| 35 20 62 79 20 43 68 72 | 69 73 20 59 65 72 67 61 |5 by Chr|is Yerga|
|000000c0| 0d 3b 09 09 09 09 d7 0d | 0d 0d 49 4e 43 4c 55 44 |.;......|..INCLUD|
|000000d0| 45 20 09 4d 61 63 54 72 | 61 70 73 2e 44 0d 0d 3b |E .MacTr|aps.D..;|
|000000e0| 20 20 44 65 63 6c 61 72 | 65 20 65 78 74 65 72 6e |  Declar|e extern|
|000000f0| 61 6c 20 6c 61 62 65 6c | 73 0d 0d 58 44 45 46 09 |al label|s..XDEF.|
|00000100| 53 54 41 52 54 0d 0d 2e | 54 52 41 50 09 5f 4d 61 |START...|TRAP._Ma|
|00000110| 6b 65 46 69 6c 65 09 24 | 41 30 30 38 0d 0d 3b d9 |keFile.$|A008..;.|
|00000120| d9 d9 d9 d9 d9 d9 d9 d9 | d9 d9 d9 d9 d9 d9 d9 d9 |........|........|
|00000130| d9 d9 d9 d9 d9 d9 d9 d9 | 20 44 65 66 69 6e 65 20 |........| Define |
|00000140| 4d 61 63 72 6f 73 20 d9 | d9 d9 d9 d9 d9 d9 d9 d9 |Macros .|........|
|00000150| d9 d9 d9 d9 d9 d9 d9 d9 | d9 d9 d9 d9 d9 d9 d9 d9 |........|........|
|00000160| 0d 0d 4d 41 43 52 4f 09 | 49 73 45 72 72 6f 72 09 |..MACRO.|IsError.|
|00000170| 3d 0d 09 43 4d 50 2e 57 | 09 09 23 30 2c 44 30 09 |=..CMP.W|..#0,D0.|
|00000180| 09 3b 43 68 65 63 6b 20 | 66 6f 72 20 6e 6f 6e 7a |.;Check |for nonz|
|00000190| 65 72 6f 20 44 30 0d 09 | 42 45 51 09 09 40 32 0d |ero D0..|BEQ..@2.|
|000001a0| 09 42 52 41 09 09 69 6f | 45 72 72 09 09 3b 70 6f |.BRA..io|Err..;po|
|000001b0| 70 20 75 70 20 74 68 65 | 20 65 72 72 6f 72 20 64 |p up the| error d|
|000001c0| 69 61 6c 6f 67 0d 40 32 | 3a 0d 09 7c 0d 0d 4d 41 |ialog.@2|:..|..MA|
|000001d0| 43 52 4f 20 09 43 65 6e | 74 65 72 09 53 74 72 69 |CRO .Cen|ter.Stri|
|000001e0| 6e 67 2c 4d 69 64 50 54 | 2c 59 09 3d 0d 0d 09 43 |ng,MidPT|,Y.=...C|
|000001f0| 4c 52 2e 57 09 2d 28 53 | 50 29 09 09 3b 53 61 76 |LR.W.-(S|P)..;Sav|
|00000200| 65 20 72 6f 6f 6d 20 66 | 6f 72 20 49 4e 54 45 47 |e room f|or INTEG|
|00000210| 45 52 20 77 69 64 74 68 | 20 6f 66 20 73 74 72 69 |ER width| of stri|
|00000220| 6e 67 0d 09 50 45 41 09 | 27 7b 53 74 72 69 6e 67 |ng..PEA.|'{String|
|00000230| 7d 27 0d 09 5f 53 74 72 | 69 6e 67 57 69 64 74 68 |}'.._Str|ingWidth|
|00000240| 0d 09 43 4c 52 2e 4c 09 | 44 33 09 09 3b 43 6c 65 |..CLR.L.|D3..;Cle|
|00000250| 61 72 20 74 68 65 20 68 | 69 67 68 20 77 6f 72 64 |ar the h|igh word|
|00000260| 20 6f 66 20 44 33 20 73 | 6f 20 74 68 65 20 44 49 | of D3 s|o the DI|
|00000270| 56 55 20 77 6f 72 6b 73 | 0d 09 4d 4f 56 45 2e 57 |VU works|..MOVE.W|
|00000280| 09 28 53 50 29 2b 2c 44 | 33 09 3b 47 65 74 20 74 |.(SP)+,D|3.;Get t|
|00000290| 68 65 20 77 69 64 74 68 | 20 28 69 6e 20 70 69 78 |he width| (in pix|
|000002a0| 65 6c 73 29 20 69 6e 20 | 44 33 0d 09 44 49 56 55 |els) in |D3..DIVU|
|000002b0| 09 23 32 2c 44 33 09 09 | 3b 44 69 76 69 64 65 20 |.#2,D3..|;Divide |
|000002c0| 62 79 20 32 0d 09 4d 4f | 56 45 2e 4c 09 23 7b 4d |by 2..MO|VE.L.#{M|
|000002d0| 69 64 50 54 7d 2c 44 34 | 0d 09 53 55 42 2e 57 09 |idPT},D4|..SUB.W.|
|000002e0| 44 33 2c 44 34 09 09 3b | 53 75 62 74 72 61 63 74 |D3,D4..;|Subtract|
|000002f0| 20 28 57 69 64 74 68 2f | 32 29 20 66 72 6f 6d 20 | (Width/|2) from |
|00000300| 31 30 33 20 74 6f 20 63 | 65 6e 74 65 72 20 74 65 |103 to c|enter te|
|00000310| 78 74 0d 09 4d 4f 56 45 | 2e 57 09 44 34 2c 2d 28 |xt..MOVE|.W.D4,-(|
|00000320| 53 50 29 09 3b 50 75 73 | 68 20 74 68 65 20 58 20 |SP).;Pus|h the X |
|00000330| 63 6f 6f 72 64 69 6e 61 | 74 65 0d 09 4d 4f 56 45 |coordina|te..MOVE|
|00000340| 2e 57 09 23 7b 59 7d 2c | 2d 28 53 50 29 09 3b 50 |.W.#{Y},|-(SP).;P|
|00000350| 75 73 68 20 74 68 65 20 | 59 20 63 6f 6f 72 64 69 |ush the |Y coordi|
|00000360| 6e 61 74 65 0d 09 5f 4d | 6f 76 65 54 6f 09 09 09 |nate.._M|oveTo...|
|00000370| 3b 50 6f 73 69 74 69 6f | 6e 20 74 68 65 20 70 65 |;Positio|n the pe|
|00000380| 6e 0d 09 0d 09 50 45 41 | 09 27 7b 53 74 72 69 6e |n....PEA|.'{Strin|
|00000390| 67 7d 27 0d 09 5f 44 72 | 61 77 53 74 72 69 6e 67 |g}'.._Dr|awString|
|000003a0| 0d 09 7c 09 09 09 3b 45 | 6e 64 20 6f 66 20 4d 61 |..|...;E|nd of Ma|
|000003b0| 63 72 6f 0d 09 0d 3b d9 | d9 d9 d9 d9 d9 d9 d9 d9 |cro...;.|........|
|000003c0| d9 d9 d9 d9 d9 d9 d9 d9 | d9 20 4c 6f 63 61 6c 20 |........|. Local |
|000003d0| 43 6f 6e 73 74 61 6e 74 | 73 20 d9 d9 d9 d9 d9 d9 |Constant|s ......|
|000003e0| d9 d9 d9 d9 d9 d9 d9 d9 | d9 d9 d9 d9 d9 d9 d9 d9 |........|........|
|000003f0| 0d 0d 41 6c 6c 45 76 65 | 6e 74 73 09 45 51 55 09 |..AllEve|nts.EQU.|
|00000400| 24 30 30 30 30 46 46 46 | 46 09 3b 20 4d 61 73 6b |$0000FFF|F.; Mask|
|00000410| 20 66 6f 72 20 46 6c 75 | 73 68 45 76 65 6e 74 73 | for Flu|shEvents|
|00000420| 0d 4d 61 78 45 76 65 6e | 74 73 09 45 51 55 09 31 |.MaxEven|ts.EQU.1|
|00000430| 32 0d 44 57 69 6e 64 4c | 65 6e 09 45 51 55 09 24 |2.DWindL|en.EQU.$|
|00000440| 41 41 09 09 3b 20 54 68 | 65 20 73 69 7a 65 20 6f |AA..; Th|e size o|
|00000450| 66 20 61 20 44 69 61 6c | 6f 67 20 52 65 63 6f 72 |f a Dial|og Recor|
|00000460| 64 0d 0d 3b d9 d9 d9 d9 | d9 d9 d9 d9 d9 d9 d9 d9 |d..;....|........|
|00000470| d9 d9 d9 20 53 74 61 72 | 74 20 6f 66 20 4d 61 69 |... Star|t of Mai|
|00000480| 6e 20 50 72 6f 67 72 61 | 6d 20 d9 d9 d9 d9 d9 d9 |n Progra|m ......|
|00000490| d9 d9 d9 d9 d9 d9 d9 d9 | d9 d9 d9 d9 d9 0d 0d 42 |........|.......B|
|000004a0| 61 64 50 74 72 3a 09 5f | 44 65 62 75 67 67 65 72 |adPtr:._|Debugger|
|000004b0| 09 09 09 3b 53 68 6f 75 | 6c 64 20 6e 65 76 65 72 |...;Shou|ld never|
|000004c0| 20 67 65 74 20 68 65 72 | 65 2e 20 20 49 73 20 63 | get her|e.  Is c|
|000004d0| 61 6c 6c 65 64 0d 09 09 | 09 09 09 3b 77 68 65 6e |alled...|...;when|
|000004e0| 20 74 68 65 72 65 20 69 | 73 20 61 20 70 72 6f 62 | there i|s a prob|
|000004f0| 6c 65 6d 20 77 69 74 68 | 20 74 68 65 0d 09 09 09 |lem with| the....|
|00000500| 09 09 3b 6d 65 6d 6f 72 | 79 20 6d 61 6e 61 67 65 |..;memor|y manage|
|00000510| 72 2e 0d 0d 49 4f 45 72 | 72 3a 09 43 4c 52 2e 4c |r...IOEr|r:.CLR.L|
|00000520| 09 2d 28 53 50 29 09 09 | 3b 53 61 76 65 20 72 6f |.-(SP)..|;Save ro|
|00000530| 6f 6d 20 66 6f 72 20 44 | 49 61 6c 6f 67 50 74 72 |om for D|IalogPtr|
|00000540| 0d 09 4d 4f 56 45 2e 57 | 09 23 31 35 30 2c 2d 28 |..MOVE.W|.#150,-(|
|00000550| 53 50 29 09 3b 54 68 65 | 20 52 65 73 49 44 20 6f |SP).;The| ResID o|
|00000560| 66 20 74 68 65 20 65 72 | 72 6f 72 20 64 69 61 6c |f the er|ror dial|
|00000570| 6f 67 0d 09 50 45 41 09 | 45 72 72 44 69 61 6c 6f |og..PEA.|ErrDialo|
|00000580| 67 28 41 35 29 09 3b 57 | 68 65 72 65 20 74 6f 20 |g(A5).;W|here to |
|00000590| 70 75 74 20 74 68 65 20 | 44 69 61 6c 6f 67 52 65 |put the |DialogRe|
|000005a0| 63 0d 09 4d 4f 56 45 2e | 4c 09 23 2d 31 2c 2d 28 |c..MOVE.|L.#-1,-(|
|000005b0| 53 50 29 09 3b 50 75 74 | 20 69 74 20 69 6e 20 66 |SP).;Put| it in f|
|000005c0| 72 6f 6e 74 2c 20 70 6c | 65 61 73 65 2e 2e 2e 0d |ront, pl|ease....|
|000005d0| 09 5f 47 65 74 4e 65 77 | 44 69 61 6c 6f 67 0d 09 |._GetNew|Dialog..|
|000005e0| 4c 45 41 09 45 72 72 44 | 48 61 6e 64 6c 65 2c 41 |LEA.ErrD|Handle,A|
|000005f0| 32 09 3b 53 61 76 65 20 | 68 61 6e 64 6c 65 2c 20 |2.;Save |handle, |
|00000600| 62 75 74 20 6b 65 65 70 | 20 69 74 0d 09 4d 4f 56 |but keep| it..MOV|
|00000610| 45 2e 4c 09 28 53 50 29 | 2c 28 41 32 29 09 3b 6f |E.L.(SP)|,(A2).;o|
|00000620| 6e 20 74 68 65 20 73 74 | 61 63 6b 0d 09 5f 44 72 |n the st|ack.._Dr|
|00000630| 61 77 44 69 61 6c 6f 67 | 09 09 3b 44 72 61 77 20 |awDialog|..;Draw |
|00000640| 74 68 65 20 64 69 61 6c | 6f 67 2e 2e 0d 09 0d 09 |the dial|og......|
|00000650| 4c 45 41 09 45 72 72 44 | 48 61 6e 64 6c 65 2c 41 |LEA.ErrD|Handle,A|
|00000660| 32 0d 09 4d 4f 56 45 2e | 4c 09 28 41 32 29 2c 2d |2..MOVE.|L.(A2),-|
|00000670| 28 53 50 29 09 3b 53 65 | 74 20 74 68 65 20 44 69 |(SP).;Se|t the Di|
|00000680| 61 6c 6f 67 20 74 6f 20 | 74 68 65 20 63 75 72 72 |alog to |the curr|
|00000690| 65 6e 74 20 47 72 61 66 | 50 6f 72 74 0d 09 5f 53 |ent Graf|Port.._S|
|000006a0| 65 74 50 6f 72 74 0d 09 | 0d 09 43 65 6e 74 65 72 |etPort..|..Center|
|000006b0| 09 53 6f 72 72 79 21 20 | 20 54 68 61 74 20 6f 70 |.Sorry! | That op|
|000006c0| 65 72 61 74 69 6f 6e 20 | 77 61 73 20 69 6e 74 65 |eration |was inte|
|000006d0| 72 72 75 70 74 65 64 2c | 31 35 30 2c 32 30 0d 09 |rrupted,|150,20..|
|000006e0| 43 65 6e 74 65 72 09 62 | 79 20 61 6e 20 49 2f 4f |Center.b|y an I/O|
|000006f0| 20 65 72 72 6f 72 2e 20 | 43 68 65 63 6b 20 74 68 | error. |Check th|
|00000700| 65 20 64 69 73 6b 20 61 | 6e 64 2c 31 35 30 2c 33 |e disk a|nd,150,3|
|00000710| 32 0d 09 43 65 6e 74 65 | 72 09 74 72 79 20 61 67 |2..Cente|r.try ag|
|00000720| 61 69 6e 2e 2c 31 35 30 | 2c 34 34 0d 09 42 53 52 |ain.,150|,44..BSR|
|00000730| 09 41 77 61 69 74 4f 4b | 0d 09 0d 09 4d 4f 56 45 |.AwaitOK|....MOVE|
|00000740| 2e 4c 09 45 72 72 44 48 | 61 6e 64 6c 65 2c 2d 28 |.L.ErrDH|andle,-(|
|00000750| 53 50 29 09 3b 47 65 74 | 20 72 69 64 20 6f 66 20 |SP).;Get| rid of |
|00000760| 74 68 65 20 64 69 61 6c | 6f 67 0d 09 5f 44 69 73 |the dial|og.._Dis|
|00000770| 70 6f 73 44 69 61 6c 6f | 67 0d 09 4d 4f 56 45 2e |posDialo|g..MOVE.|
|00000780| 4c 09 4d 61 69 6e 50 6f | 72 74 2c 2d 28 53 50 29 |L.MainPo|rt,-(SP)|
|00000790| 09 09 3b 72 65 73 74 6f | 72 65 20 74 68 65 20 6d |..;resto|re the m|
|000007a0| 61 69 6e 20 70 6f 72 74 | 0d 09 5f 53 65 74 50 6f |ain port|.._SetPo|
|000007b0| 72 74 09 09 09 3b 61 73 | 20 74 68 65 20 61 63 74 |rt...;as| the act|
|000007c0| 69 76 65 20 70 6f 72 74 | 0d 09 42 52 41 09 4d 61 |ive port|..BRA.Ma|
|000007d0| 69 6e 09 09 09 3b 61 62 | 6f 72 74 20 74 6f 20 74 |in...;ab|ort to t|
|000007e0| 68 65 20 6d 61 69 6e 20 | 6d 65 6e 75 0d 0d 53 54 |he main |menu..ST|
|000007f0| 41 52 54 3a 09 4d 4f 56 | 45 4d 2e 4c 09 44 30 2d |ART:.MOV|EM.L.D0-|
|00000800| 44 37 2f 41 30 2d 41 36 | 2c 2d 28 53 50 29 09 3b |D7/A0-A6|,-(SP).;|
|00000810| 54 68 65 20 73 74 61 6e | 64 61 72 64 2d 69 73 73 |The stan|dard-iss|
|00000820| 75 65 20 72 6f 75 74 69 | 6e 65 20 77 68 69 63 68 |ue routi|ne which|
|00000830| 0d 09 4c 45 41 09 53 41 | 56 45 52 45 47 53 2c 41 |..LEA.SA|VEREGS,A|
|00000840| 30 09 09 3b 77 68 69 63 | 68 20 73 61 76 65 73 20 |0..;whic|h saves |
|00000850| 74 68 65 20 72 65 67 69 | 73 74 65 72 73 20 65 74 |the regi|sters et|
|00000860| 63 2e 0d 09 4d 4f 56 45 | 2e 4c 09 41 36 2c 28 41 |c...MOVE|.L.A6,(A|
|00000870| 30 29 09 0d 09 4d 4f 56 | 45 2e 4c 09 41 37 2c 34 |0)...MOV|E.L.A7,4|
|00000880| 28 41 30 29 0d 09 0d 3b | d9 d9 d9 d9 d9 d9 d9 d9 |(A0)...;|........|
|00000890| d9 d9 d9 d9 d9 20 49 6e | 69 74 69 61 6c 69 7a 65 |..... In|itialize|
|000008a0| 20 74 68 65 20 52 4f 4d | 20 72 6f 75 74 69 6e 65 | the ROM| routine|
|000008b0| 73 20 d9 d9 d9 d9 d9 d9 | d9 d9 d9 d9 d9 d9 d9 d9 |s ......|........|
|000008c0| d9 0d 0d 09 50 45 41 09 | 2d 34 28 41 35 29 09 09 |....PEA.|-4(A5)..|
|000008d0| 3b 51 44 20 47 6c 6f 62 | 61 6c 20 70 74 72 0d 09 |;QD Glob|al ptr..|
|000008e0| 5f 49 6e 69 74 47 72 61 | 66 09 09 3b 49 6e 69 74 |_InitGra|f..;Init|
|000008f0| 20 51 44 20 67 6c 6f 62 | 61 6c 0d 09 0d 09 5f 49 | QD glob|al...._I|
|00000900| 6e 69 74 46 6f 6e 74 73 | 09 09 3b 49 6e 69 74 20 |nitFonts|..;Init |
|00000910| 66 6f 6e 74 20 6d 61 6e | 61 67 65 72 0d 09 5f 49 |font man|ager.._I|
|00000920| 6e 69 74 57 69 6e 64 6f | 77 73 09 09 3b 49 6e 69 |nitWindo|ws..;Ini|
|00000930| 74 20 57 69 6e 64 6f 77 | 20 4d 61 6e 61 67 65 72 |t Window| Manager|
|00000940| 0d 09 5f 49 6e 69 74 4d | 65 6e 75 73 09 09 3b 47 |.._InitM|enus..;G|
|00000950| 75 65 73 73 20 77 68 61 | 74 2e 2e 2e 79 6f 75 20 |uess wha|t...you |
|00000960| 67 6f 74 20 69 74 21 0d | 09 0d 09 43 4c 52 2e 4c |got it!.|...CLR.L|
|00000970| 09 2d 28 53 50 29 09 09 | 3b 53 74 61 6e 64 61 72 |.-(SP)..|;Standar|
|00000980| 64 20 53 79 73 45 72 72 | 2f 44 53 20 64 69 61 6c |d SysErr|/DS dial|
|00000990| 6f 67 0d 09 5f 49 6e 69 | 74 44 69 61 6c 6f 67 73 |og.._Ini|tDialogs|
|000009a0| 09 09 3b 49 6e 69 74 20 | 44 69 61 6c 6f 67 20 4d |..;Init |Dialog M|
|000009b0| 61 6e 67 65 72 0d 09 0d | 09 5f 54 45 49 6e 69 74 |anger...|._TEInit|
|000009c0| 09 09 09 3b 49 6e 69 74 | 20 52 4f 4d 20 54 65 78 |...;Init| ROM Tex|
|000009d0| 74 20 65 64 69 74 0d 09 | 0d 09 4d 4f 56 45 2e 4c |t edit..|..MOVE.L|
|000009e0| 09 23 41 6c 6c 45 76 65 | 6e 74 73 2c 44 30 09 3b |.#AllEve|nts,D0.;|
|000009f0| 41 6e 64 20 66 6c 75 73 | 68 20 41 4c 4c 20 70 72 |And flus|h ALL pr|
|00000a00| 65 76 69 6f 75 73 0d 09 | 5f 46 6c 75 73 68 45 76 |evious..|_FlushEv|
|00000a10| 65 6e 74 73 09 09 3b 65 | 76 65 6e 74 73 0d 09 0d |ents..;e|vents...|
|00000a20| 09 5f 49 6e 69 74 43 75 | 72 73 6f 72 09 09 3b 47 |._InitCu|rsor..;G|
|00000a30| 65 74 20 74 68 65 20 73 | 74 61 6e 64 61 72 64 20 |et the s|tandard |
|00000a40| 61 72 72 6f 77 0d 09 0d | 09 50 45 41 09 47 72 61 |arrow...|.PEA.Gra|
|00000a50| 79 50 61 74 0d 09 5f 42 | 61 63 6b 50 61 74 0d 09 |yPat.._B|ackPat..|
|00000a60| 50 45 41 09 53 63 72 65 | 65 6e 09 09 3b 43 6c 65 |PEA.Scre|en..;Cle|
|00000a70| 61 72 20 74 68 65 20 73 | 63 72 65 65 6e 0d 09 5f |ar the s|creen.._|
|00000a80| 45 72 61 73 65 52 65 63 | 74 0d 09 50 45 41 09 57 |EraseRec|t..PEA.W|
|00000a90| 68 69 74 65 50 61 74 0d | 09 5f 42 61 63 6b 50 61 |hitePat.|._BackPa|
|00000aa0| 74 0d 09 0d 3b d9 d9 d9 | d9 d9 d9 d9 d9 d9 d9 d9 |t...;...|........|
|00000ab0| d9 d9 d9 d9 d9 d9 20 41 | 6c 6c 6f 63 61 74 65 20 |...... A|llocate |
|00000ac0| 73 6f 6d 65 20 4d 65 6d | 6f 72 79 20 d9 d9 d9 d9 |some Mem|ory ....|
|00000ad0| d9 d9 d9 d9 d9 d9 d9 d9 | d9 d9 d9 d9 d9 d9 d9 d9 |........|........|
|00000ae0| d9 0d 0d 09 4d 4f 56 45 | 2e 4c 09 23 38 30 2c 44 |....MOVE|.L.#80,D|
|00000af0| 30 09 09 3b 47 65 74 20 | 38 30 20 42 79 74 65 73 |0..;Get |80 Bytes|
|00000b00| 20 66 6f 72 20 49 4f 50 | 61 72 61 6d 42 6c 6f 63 | for IOP|aramBloc|
|00000b10| 6b 0d 09 5f 4e 65 77 50 | 74 72 0d 09 49 73 45 72 |k.._NewP|tr..IsEr|
|00000b20| 72 6f 72 09 09 09 3b 48 | 61 6e 64 6c 65 20 61 6e |ror...;H|andle an|
|00000b30| 79 20 65 72 72 6f 72 0d | 09 4c 45 41 09 49 4f 50 |y error.|.LEA.IOP|
|00000b40| 61 72 61 6d 42 6c 6f 63 | 6b 2c 41 31 09 3b 53 61 |aramBloc|k,A1.;Sa|
|00000b50| 76 65 20 74 68 65 20 50 | 74 72 0d 09 4d 4f 56 45 |ve the P|tr..MOVE|
|00000b60| 2e 4c 09 41 30 2c 28 41 | 31 29 0d 09 0d 09 4d 4f |.L.A0,(A|1)....MO|
|00000b70| 56 45 2e 4c 09 23 35 32 | 32 2c 44 30 09 09 3b 47 |VE.L.#52|2,D0..;G|
|00000b80| 65 74 20 35 32 32 20 42 | 79 74 65 73 20 66 6f 72 |et 522 B|ytes for|
|00000b90| 20 61 63 63 65 73 73 20 | 70 61 74 68 20 62 75 66 | access |path buf|
|00000ba0| 66 65 72 0d 09 5f 4e 65 | 77 50 74 72 0d 09 49 73 |fer.._Ne|wPtr..Is|
|00000bb0| 45 72 72 6f 72 09 09 09 | 3b 48 61 6e 64 6c 65 20 |Error...|;Handle |
|00000bc0| 61 6e 79 20 65 72 72 6f | 72 0d 09 4c 45 41 09 41 |any erro|r..LEA.A|
|00000bd0| 50 42 75 66 66 65 72 2c | 41 31 09 3b 53 61 76 65 |PBuffer,|A1.;Save|
|00000be0| 20 74 68 65 20 50 74 72 | 0d 09 4d 4f 56 45 2e 4c | the Ptr|..MOVE.L|
|00000bf0| 09 41 30 2c 28 41 31 29 | 0d 09 0d 09 4d 4f 56 45 |.A0,(A1)|....MOVE|
|00000c00| 2e 4c 09 23 31 32 38 2c | 44 30 09 09 3b 47 65 74 |.L.#128,|D0..;Get|
|00000c10| 20 31 32 38 20 42 79 74 | 65 73 20 66 6f 72 20 49 | 128 Byt|es for I|
|00000c20| 63 6f 6e 20 44 61 74 61 | 0d 09 5f 4e 65 77 50 74 |con Data|.._NewPt|
|00000c30| 72 0d 09 49 73 45 72 72 | 6f 72 09 09 09 3b 44 6f |r..IsErr|or...;Do|
|00000c40| 20 74 68 65 20 65 72 72 | 6f 72 20 74 68 69 6e 67 | the err|or thing|
|00000c50| 2e 2e 2e 0d 09 4c 45 41 | 09 49 63 6f 6e 42 69 74 |.....LEA|.IconBit|
|00000c60| 4d 61 70 2c 41 31 09 3b | 53 61 76 65 20 74 68 65 |Map,A1.;|Save the|
|00000c70| 20 50 74 72 0d 09 4d 4f | 56 45 2e 4c 09 41 30 2c | Ptr..MO|VE.L.A0,|
|00000c80| 28 41 31 29 0d 09 0d 09 | 4d 4f 56 45 2e 4c 09 23 |(A1)....|MOVE.L.#|
|00000c90| 31 32 38 2c 44 30 09 09 | 3b 47 65 74 20 31 32 38 |128,D0..|;Get 128|
|00000ca0| 20 42 79 74 65 73 20 66 | 6f 72 20 4d 61 73 6b 20 | Bytes f|or Mask |
|00000cb0| 44 61 74 61 0d 09 5f 4e | 65 77 50 74 72 0d 09 49 |Data.._N|ewPtr..I|
|00000cc0| 73 45 72 72 6f 72 09 09 | 09 3b 44 6f 20 74 68 65 |sError..|.;Do the|
|00000cd0| 20 65 72 72 6f 72 20 74 | 68 69 6e 67 2e 2e 2e 0d | error t|hing....|
|00000ce0| 09 4c 45 41 09 4d 61 73 | 6b 42 69 74 4d 61 70 2c |.LEA.Mas|kBitMap,|
|00000cf0| 41 31 09 3b 53 61 76 65 | 20 74 68 65 20 50 74 72 |A1.;Save| the Ptr|
|00000d00| 0d 09 4d 4f 56 45 2e 4c | 09 41 30 2c 28 41 31 29 |..MOVE.L|.A0,(A1)|
|00000d10| 0d 09 0d 09 4d 4f 56 45 | 2e 4c 09 23 32 30 34 38 |....MOVE|.L.#2048|
|00000d20| 2c 44 30 09 3b 47 65 74 | 20 32 4b 20 62 79 74 65 |,D0.;Get| 2K byte|
|00000d30| 73 20 66 6f 72 20 54 61 | 72 67 65 74 20 66 69 6c |s for Ta|rget fil|
|00000d40| 65 20 62 75 66 66 65 72 | 0d 09 5f 4e 65 77 50 74 |e buffer|.._NewPt|
|00000d50| 72 0d 09 49 73 45 72 72 | 6f 72 0d 09 4c 45 41 09 |r..IsErr|or..LEA.|
|00000d60| 43 6f 6e 76 65 72 74 42 | 75 66 2c 41 31 09 3b 73 |ConvertB|uf,A1.;s|
|00000d70| 61 76 65 20 74 68 65 20 | 70 74 72 0d 09 4d 4f 56 |ave the |ptr..MOV|
|00000d80| 45 2e 4c 09 41 30 2c 28 | 41 31 29 0d 09 0d 3b d9 |E.L.A0,(|A1)...;.|
|00000d90| d9 d9 d9 d9 d9 d9 d9 d9 | d9 d9 d9 d9 d9 d9 d9 20 |........|....... |
|00000da0| 53 65 74 20 75 70 20 74 | 68 65 20 44 69 61 6c 6f |Set up t|he Dialo|
|00000db0| 67 20 42 6f 78 20 d9 d9 | d9 d9 d9 d9 d9 d9 d9 d9 |g Box ..|........|
|00000dc0| d9 d9 d9 d9 d9 d9 d9 d9 | d9 d9 d9 0d 0d 09 43 4c |........|......CL|
|00000dd0| 52 2e 4c 09 2d 28 53 50 | 29 09 09 3b 53 61 76 65 |R.L.-(SP|)..;Save|
|00000de0| 20 72 6f 6f 6d 20 66 6f | 72 20 44 49 61 6c 6f 67 | room fo|r DIalog|
|00000df0| 50 74 72 0d 09 4d 4f 56 | 45 2e 57 09 23 31 32 38 |Ptr..MOV|E.W.#128|
|00000e00| 2c 2d 28 53 50 29 09 3b | 54 68 65 20 52 65 73 49 |,-(SP).;|The ResI|
|00000e10| 44 20 6f 66 20 74 68 65 | 20 64 69 61 6c 6f 67 0d |D of the| dialog.|
|00000e20| 09 50 45 41 09 4d 61 69 | 6e 44 69 61 6c 6f 67 28 |.PEA.Mai|nDialog(|
|00000e30| 41 35 29 09 3b 57 68 65 | 72 65 20 74 6f 20 70 75 |A5).;Whe|re to pu|
|00000e40| 74 20 74 68 65 20 44 69 | 61 6c 6f 67 52 65 63 0d |t the Di|alogRec.|
|00000e50| 09 4d 4f 56 45 2e 4c 09 | 23 2d 31 2c 2d 28 53 50 |.MOVE.L.|#-1,-(SP|
|00000e60| 29 09 3b 50 75 74 20 69 | 74 20 69 6e 20 66 72 6f |).;Put i|t in fro|
|00000e70| 6e 74 2c 20 70 6c 65 61 | 73 65 2e 2e 2e 0d 09 5f |nt, plea|se....._|
|00000e80| 47 65 74 4e 65 77 44 69 | 61 6c 6f 67 0d 09 4c 45 |GetNewDi|alog..LE|
|00000e90| 41 09 4d 61 69 6e 44 48 | 61 6e 64 6c 65 2c 41 32 |A.MainDH|andle,A2|
|00000ea0| 09 3b 53 61 76 65 20 68 | 61 6e 64 6c 65 2c 20 62 |.;Save h|andle, b|
|00000eb0| 75 74 20 6b 65 65 70 20 | 69 74 0d 09 4d 4f 56 45 |ut keep |it..MOVE|
|00000ec0| 2e 4c 09 28 53 50 29 2c | 28 41 32 29 09 3b 6f 6e |.L.(SP),|(A2).;on|
|00000ed0| 20 74 68 65 20 73 74 61 | 63 6b 0d 09 5f 44 72 61 | the sta|ck.._Dra|
|00000ee0| 77 44 69 61 6c 6f 67 09 | 09 3b 44 72 61 77 20 74 |wDialog.|.;Draw t|
|00000ef0| 68 65 20 64 69 61 6c 6f | 67 2e 2e 0d 09 0d 09 4c |he dialo|g......L|
|00000f00| 45 41 09 4d 61 69 6e 44 | 48 61 6e 64 6c 65 2c 41 |EA.MainD|Handle,A|
|00000f10| 32 0d 09 4d 4f 56 45 2e | 4c 09 28 41 32 29 2c 2d |2..MOVE.|L.(A2),-|
|00000f20| 28 53 50 29 09 3b 53 65 | 74 20 74 68 65 20 44 69 |(SP).;Se|t the Di|
|00000f30| 61 6c 6f 67 20 74 6f 20 | 74 68 65 20 63 75 72 72 |alog to |the curr|
|00000f40| 65 6e 74 20 47 72 61 66 | 50 6f 72 74 0d 09 5f 53 |ent Graf|Port.._S|
|00000f50| 65 74 50 6f 72 74 0d 09 | 0d 09 50 45 41 09 49 63 |etPort..|..PEA.Ic|
|00000f60| 6f 6e 46 72 61 6d 65 09 | 3b 4f 75 74 6c 69 6e 65 |onFrame.|;Outline|
|00000f70| 20 74 68 65 20 49 43 4f | 4e 20 62 6f 78 0d 09 5f | the ICO|N box.._|
|00000f80| 46 72 61 6d 65 52 65 63 | 74 0d 09 50 45 41 09 4d |FrameRec|t..PEA.M|
|00000f90| 61 73 6b 46 72 61 6d 65 | 09 3b 44 69 74 74 6f 20 |askFrame|.;Ditto |
|00000fa0| 66 6f 72 20 74 68 65 20 | 4d 41 53 4b 0d 09 5f 46 |for the |MASK.._F|
|00000fb0| 72 61 6d 65 52 65 63 74 | 0d 09 0d 09 4d 4f 56 45 |rameRect|....MOVE|
|00000fc0| 2e 57 09 23 37 2c 2d 28 | 53 50 29 09 3b 41 74 68 |.W.#7,-(|SP).;Ath|
|00000fd0| 65 6e 73 0d 09 5f 54 65 | 78 74 46 6f 6e 74 0d 09 |ens.._Te|xtFont..|
|00000fe0| 4d 4f 56 45 2e 57 09 23 | 31 38 2c 2d 28 53 50 29 |MOVE.W.#|18,-(SP)|
|00000ff0| 09 3b 31 38 20 50 74 0d | 09 5f 54 65 78 74 53 69 |.;18 Pt.|._TextSi|
|00001000| 7a 65 0d 09 0d 09 43 65 | 6e 74 65 72 09 49 63 6f |ze....Ce|nter.Ico|
|00001010| 6e 20 43 6f 6e 76 65 72 | 74 65 72 20 33 2e 30 2c |n Conver|ter 3.0,|
|00001020| 32 30 30 2c 33 30 0d 09 | 0d 09 4d 4f 56 45 2e 57 |200,30..|..MOVE.W|
|00001030| 09 23 32 2c 2d 28 53 50 | 29 09 3b 47 65 6e 65 76 |.#2,-(SP|).;Genev|
|00001040| 61 0d 09 5f 54 65 78 74 | 46 6f 6e 74 0d 09 4d 4f |a.._Text|Font..MO|
|00001050| 56 45 2e 57 09 23 31 32 | 2c 2d 28 53 50 29 09 3b |VE.W.#12|,-(SP).;|
|00001060| 31 32 20 50 74 0d 09 5f | 54 65 78 74 53 69 7a 65 |12 Pt.._|TextSize|
|00001070| 0d 09 0d 09 43 65 6e 74 | 65 72 09 a9 31 39 38 35 |....Cent|er..1985|
|00001080| 20 62 79 20 43 68 72 69 | 73 20 59 65 72 67 61 20 | by Chri|s Yerga |
|00001090| 66 6f 72 20 4d 61 63 54 | 75 74 6f 72 2c 32 30 30 |for MacT|utor,200|
|000010a0| 2c 34 35 0d 09 0d 09 43 | 4c 52 2e 57 09 2d 28 53 |,45....C|LR.W.-(S|
|000010b0| 50 29 09 09 3b 43 68 69 | 63 61 67 6f 0d 09 5f 54 |P)..;Chi|cago.._T|
|000010c0| 65 78 74 46 6f 6e 74 0d | 09 0d 09 50 45 41 09 4d |extFont.|...PEA.M|
|000010d0| 61 69 6e 50 6f 72 74 09 | 3b 53 61 76 65 20 74 68 |ainPort.|;Save th|
|000010e0| 65 20 47 72 61 66 50 74 | 72 20 66 6f 72 20 74 68 |e GrafPt|r for th|
|000010f0| 65 20 4d 61 69 6e 20 70 | 6f 72 74 0d 09 5f 47 65 |e Main p|ort.._Ge|
|00001100| 74 50 6f 72 74 0d 09 0d | 3b d9 d9 d9 d9 d9 d9 d9 |tPort...|;.......|
|00001110| d9 d9 d9 d9 d9 d9 d9 d9 | d9 d9 d9 d9 20 4d 61 69 |........|.... Mai|
|00001120| 6e 20 45 76 65 6e 74 20 | 4c 6f 6f 70 20 d9 d9 d9 |n Event |Loop ...|
|00001130| d9 d9 d9 d9 d9 d9 d9 d9 | d9 d9 d9 d9 d9 d9 d9 d9 |........|........|
|00001140| d9 d9 d9 d9 d9 0d 0d 4d | 61 69 6e 3a 0d 09 43 4c |.......M|ain:..CL|
|00001150| 52 2e 4c 09 2d 28 53 50 | 29 09 09 3b 4e 49 4c 20 |R.L.-(SP|)..;NIL |
|00001160| 66 6f 72 20 46 69 6c 74 | 65 72 50 72 6f 63 0d 09 |for Filt|erProc..|
|00001170| 50 45 41 09 49 74 65 6d | 48 69 74 09 09 3b 56 41 |PEA.Item|Hit..;VA|
|00001180| 52 20 49 74 65 6d 48 69 | 74 0d 09 5f 4d 6f 64 61 |R ItemHi|t.._Moda|
|00001190| 6c 44 69 61 6c 6f 67 0d | 09 4d 4f 56 45 09 49 74 |lDialog.|.MOVE.It|
|000011a0| 65 6d 48 69 74 2c 44 30 | 09 3b 47 65 74 20 74 68 |emHit,D0|.;Get th|
|000011b0| 65 20 49 74 65 6d 20 23 | 0d 09 0d 09 43 4d 50 2e |e Item #|....CMP.|
|000011c0| 42 09 23 31 2c 44 30 09 | 09 3b 4f 70 65 6e 20 61 |B.#1,D0.|.;Open a|
|000011d0| 6e 20 49 63 6f 6e 3f 0d | 09 42 45 51 09 4f 70 65 |n Icon?.|.BEQ.Ope|
|000011e0| 6e 49 63 6f 6e 0d 09 43 | 4d 50 2e 42 09 23 32 2c |nIcon..C|MP.B.#2,|
|000011f0| 44 30 09 09 3b 4f 70 65 | 6e 20 61 20 4d 61 73 6b |D0..;Ope|n a Mask|
|00001200| 3f 0d 09 42 45 51 09 4f | 70 65 6e 4d 61 73 6b 0d |?..BEQ.O|penMask.|
|00001210| 09 43 4d 50 2e 42 09 23 | 33 2c 44 30 09 09 3b 53 |.CMP.B.#|3,D0..;S|
|00001220| 74 61 6e 64 61 72 64 20 | 4d 61 73 6b 3f 0d 09 42 |tandard |Mask?..B|
|00001230| 45 51 09 53 74 64 4d 61 | 73 6b 0d 09 43 4d 50 2e |EQ.StdMa|sk..CMP.|
|00001240| 42 09 23 34 2c 44 30 09 | 09 3b 44 6f 20 74 68 65 |B.#4,D0.|.;Do the|
|00001250| 20 63 6f 6e 76 65 72 73 | 69 6f 6e 3f 0d 09 42 45 | convers|ion?..BE|
|00001260| 51 09 43 6f 6e 76 65 72 | 74 0d 09 43 4d 50 2e 42 |Q.Conver|t..CMP.B|
|00001270| 09 23 35 2c 44 30 09 09 | 3b 48 65 6c 70 3f 0d 09 |.#5,D0..|;Help?..|
|00001280| 42 45 51 09 48 65 6c 70 | 0d 09 43 4d 50 2e 42 09 |BEQ.Help|..CMP.B.|
|00001290| 23 36 2c 44 30 09 09 3b | 51 75 69 74 3f 0d 09 42 |#6,D0..;|Quit?..B|
|000012a0| 45 51 09 41 64 69 6f 73 | 0d 09 0d 09 42 52 41 09 |EQ.Adios|....BRA.|
|000012b0| 4d 61 69 6e 09 09 3b 6c | 6f 6f 70 20 74 69 6c 20 |Main..;l|oop til |
|000012c0| 77 65 20 67 65 74 20 61 | 20 67 6f 6f 64 20 65 76 |we get a| good ev|
|000012d0| 65 6e 74 0d 09 0d 41 64 | 69 6f 73 3a 0d 09 4c 45 |ent...Ad|ios:..LE|
|000012e0| 41 09 53 61 76 65 52 65 | 67 73 2c 41 30 0d 09 4d |A.SaveRe|gs,A0..M|
|000012f0| 4f 56 45 2e 4c 09 28 41 | 30 29 2c 41 36 0d 09 4d |OVE.L.(A|0),A6..M|
|00001300| 4f 56 45 2e 4c 09 34 28 | 41 30 29 2c 41 37 0d 09 |OVE.L.4(|A0),A7..|
|00001310| 4d 4f 56 45 4d 2e 4c 09 | 28 53 50 29 2b 2c 44 30 |MOVEM.L.|(SP)+,D0|
|00001320| 2d 44 37 2f 41 30 2d 41 | 36 0d 09 52 54 53 0d 0d |-D7/A0-A|6..RTS..|
|00001330| 4f 70 65 6e 49 63 6f 6e | 3a 0d 09 42 53 52 09 47 |OpenIcon|:..BSR.G|
|00001340| 65 74 46 69 6c 65 09 09 | 3b 47 65 74 20 66 69 6c |etFile..|;Get fil|
|00001350| 65 6e 61 6d 65 0d 09 42 | 45 51 09 4d 61 69 6e 09 |ename..B|EQ.Main.|
|00001360| 09 3b 75 73 65 72 20 68 | 69 74 20 3c 43 61 6e 63 |.;user h|it <Canc|
|00001370| 65 6c 3e 0d 09 4c 45 41 | 09 49 63 6f 6e 42 69 74 |el>..LEA|.IconBit|
|00001380| 4d 61 70 2c 41 33 09 3b | 73 65 74 20 75 70 20 70 |Map,A3.;|set up p|
|00001390| 61 72 61 6d 73 20 66 6f | 72 20 72 65 61 64 0d 09 |arams fo|r read..|
|000013a0| 42 53 52 09 52 65 61 64 | 49 63 6f 6e 09 3b 72 65 |BSR.Read|Icon.;re|
|000013b0| 61 64 20 74 68 65 20 66 | 69 6c 65 0d 09 42 53 52 |ad the f|ile..BSR|
|000013c0| 09 50 6c 6f 74 49 63 6f | 6e 09 3b 64 72 61 77 20 |.PlotIco|n.;draw |
|000013d0| 74 68 65 20 69 63 6f 6e | 0d 09 42 52 41 09 4d 61 |the icon|..BRA.Ma|
|000013e0| 69 6e 0d 09 0d 4f 70 65 | 6e 4d 61 73 6b 3a 0d 09 |in...Ope|nMask:..|
|000013f0| 42 53 52 09 47 65 74 46 | 69 6c 65 09 09 3b 47 65 |BSR.GetF|ile..;Ge|
|00001400| 74 20 66 69 6c 65 6e 61 | 6d 65 0d 09 42 45 51 09 |t filena|me..BEQ.|
|00001410| 4d 61 69 6e 09 09 3b 75 | 73 65 72 20 68 69 74 20 |Main..;u|ser hit |
|00001420| 63 61 6e 63 65 6c 0d 09 | 4c 45 41 09 4d 61 73 6b |cancel..|LEA.Mask|
|00001430| 42 69 74 4d 61 70 2c 41 | 33 09 3b 73 65 74 20 75 |BitMap,A|3.;set u|
|00001440| 70 20 66 6f 72 20 72 65 | 61 64 2e 2e 2e 0d 09 42 |p for re|ad.....B|
|00001450| 53 52 09 52 65 61 64 49 | 63 6f 6e 09 3b 72 65 61 |SR.ReadI|con.;rea|
|00001460| 64 20 74 68 65 20 66 69 | 6c 65 0d 09 42 53 52 09 |d the fi|le..BSR.|
|00001470| 50 6c 6f 74 4d 61 73 6b | 09 3b 64 69 73 70 6c 61 |PlotMask|.;displa|
|00001480| 79 20 74 68 65 20 6d 61 | 73 6b 0d 09 42 52 41 09 |y the ma|sk..BRA.|
|00001490| 4d 61 69 6e 0d 0d 53 74 | 64 4d 61 73 6b 3a 0d 09 |Main..St|dMask:..|
|000014a0| 4d 4f 56 45 2e 4c 09 4d | 61 73 6b 42 69 74 4d 61 |MOVE.L.M|askBitMa|
|000014b0| 70 2c 41 30 09 3b 47 65 | 74 20 50 74 72 20 74 6f |p,A0.;Ge|t Ptr to|
|000014c0| 20 42 69 74 6d 61 70 20 | 64 61 74 61 0d 09 4d 4f | Bitmap |data..MO|
|000014d0| 56 45 2e 4c 09 23 33 31 | 2c 44 30 09 09 3b 6c 6f |VE.L.#31|,D0..;lo|
|000014e0| 6f 70 20 33 32 20 74 69 | 6d 65 73 0d 46 69 6c 6c |op 32 ti|mes.Fill|
|000014f0| 4d 61 73 6b 3a 0d 09 4d | 4f 56 45 2e 4c 09 23 24 |Mask:..M|OVE.L.#$|
|00001500| 46 46 46 46 46 46 46 46 | 2c 28 41 30 29 2b 09 3b |FFFFFFFF|,(A0)+.;|
|00001510| 66 69 6c 6c 20 74 68 65 | 20 6d 61 73 6b 20 77 69 |fill the| mask wi|
|00001520| 74 68 20 62 6c 61 63 6b | 0d 09 44 42 52 41 09 44 |th black|..DBRA.D|
|00001530| 30 2c 46 69 6c 6c 4d 61 | 73 6b 09 3b 6c 6f 6f 70 |0,FillMa|sk.;loop|
|00001540| 20 75 6e 74 69 6c 20 77 | 65 27 72 65 20 64 6f 6e | until w|e're don|
|00001550| 65 0d 09 42 53 52 09 50 | 6c 6f 74 4d 61 73 6b 0d |e..BSR.P|lotMask.|
|00001560| 09 42 52 41 09 4d 61 69 | 6e 0d 09 0d 43 6f 6e 76 |.BRA.Mai|n...Conv|
|00001570| 65 72 74 3a 0d 09 4d 4f | 56 45 2e 4c 09 43 6f 6e |ert:..MO|VE.L.Con|
|00001580| 76 65 72 74 42 75 66 2c | 41 32 09 3b 46 69 6c 6c |vertBuf,|A2.;Fill|
|00001590| 20 74 68 65 20 66 69 6c | 65 20 62 75 66 66 65 72 | the fil|e buffer|
|000015a0| 20 77 69 74 68 0d 09 4d | 4f 56 45 2e 4c 09 49 63 | with..M|OVE.L.Ic|
|000015b0| 6f 6e 42 69 74 4d 61 70 | 2c 41 33 09 3b 74 68 65 |onBitMap|,A3.;the|
|000015c0| 20 69 63 6f 6e 20 64 65 | 66 69 6e 69 74 69 6f 6e | icon de|finition|
|000015d0| 0d 09 42 53 52 09 49 63 | 6f 6e 54 6f 4d 44 53 0d |..BSR.Ic|onToMDS.|
|000015e0| 09 4d 4f 56 45 2e 57 09 | 23 24 30 44 30 44 2c 28 |.MOVE.W.|#$0D0D,(|
|000015f0| 41 32 29 2b 09 3b 73 74 | 69 63 6b 20 69 6e 20 61 |A2)+.;st|ick in a|
|00001600| 20 66 65 77 20 63 72 27 | 73 20 66 6f 72 20 73 70 | few cr'|s for sp|
|00001610| 61 63 69 6e 67 0d 09 4d | 4f 56 45 2e 4c 09 4d 61 |acing..M|OVE.L.Ma|
|00001620| 73 6b 42 69 74 4d 61 70 | 2c 41 33 09 3b 20 26 20 |skBitMap|,A3.; & |
|00001630| 74 68 65 20 6d 61 73 6b | 20 64 65 66 69 6e 69 74 |the mask| definit|
|00001640| 69 6f 6e 0d 09 42 53 52 | 09 49 63 6f 6e 54 6f 4d |ion..BSR|.IconToM|
|00001650| 44 53 0d 09 42 53 52 09 | 50 75 74 46 69 6c 65 09 |DS..BSR.|PutFile.|
|00001660| 09 3b 47 65 74 20 74 68 | 65 20 66 69 6c 65 6e 61 |.;Get th|e filena|
|00001670| 6d 65 20 66 6f 72 20 73 | 61 76 65 0d 09 42 45 51 |me for s|ave..BEQ|
|00001680| 09 4d 61 69 6e 09 09 3b | 75 73 65 72 20 63 61 6e |.Main..;|user can|
|00001690| 63 65 6c 6c 65 64 20 6f | 75 74 0d 09 4d 4f 56 45 |celled o|ut..MOVE|
|000016a0| 2e 4c 09 41 32 2c 44 32 | 09 09 3b 53 61 76 65 20 |.L.A2,D2|..;Save |
|000016b0| 74 68 65 20 62 75 66 66 | 65 72 20 50 74 72 0d 09 |the buff|er Ptr..|
|000016c0| 0d 09 4d 4f 56 45 2e 4c | 09 49 4f 50 61 72 61 6d |..MOVE.L|.IOParam|
|000016d0| 42 6c 6f 63 6b 2c 41 32 | 09 3b 47 65 74 20 50 74 |Block,A2|.;Get Pt|
|000016e0| 72 20 69 6e 20 41 32 0d | 09 43 4c 52 2e 4c 09 31 |r in A2.|.CLR.L.1|
|000016f0| 32 28 41 32 29 09 09 3b | 4e 6f 20 63 6f 6d 70 6c |2(A2)..;|No compl|
|00001700| 65 74 69 6f 6e 20 72 6f | 75 74 69 6e 65 0d 09 4c |etion ro|utine..L|
|00001710| 45 41 09 47 46 69 6c 65 | 4e 61 6d 65 2c 41 30 09 |EA.GFile|Name,A0.|
|00001720| 3b 69 6f 4e 61 6d 65 50 | 74 72 0d 09 4d 4f 56 45 |;ioNameP|tr..MOVE|
|00001730| 2e 4c 09 41 30 2c 31 38 | 28 41 32 29 09 3b 73 61 |.L.A0,18|(A2).;sa|
|00001740| 76 65 20 69 74 20 69 6e | 20 49 4f 50 42 0d 09 4d |ve it in| IOPB..M|
|00001750| 4f 56 45 2e 57 09 47 65 | 74 56 52 65 66 2c 32 32 |OVE.W.Ge|tVRef,22|
|00001760| 28 41 32 29 09 3b 76 6f | 6c 75 6d 65 20 72 65 66 |(A2).;vo|lume ref|
|00001770| 20 23 0d 09 43 4c 52 2e | 42 09 32 36 28 41 32 29 | #..CLR.|B.26(A2)|
|00001780| 09 09 3b 76 65 72 73 69 | 6f 6e 20 23 20 3d 20 30 |..;versi|on # = 0|
|00001790| 20 28 77 68 79 2e 2e 2e | 2e 77 68 79 20 6e 6f 74 | (why...|.why not|
|000017a0| 3f 29 0d 09 4d 4f 56 45 | 2e 4c 09 41 32 2c 41 30 |?)..MOVE|.L.A2,A0|
|000017b0| 0d 09 5f 4d 61 6b 65 46 | 69 6c 65 09 09 3b 67 65 |.._MakeF|ile..;ge|
|000017c0| 6e 65 72 61 74 65 20 74 | 68 65 20 66 69 6c 65 0d |nerate t|he file.|
|000017d0| 09 49 73 45 72 72 6f 72 | 0d 09 0d 09 4d 4f 56 45 |.IsError|....MOVE|
|000017e0| 2e 42 09 23 32 2c 32 37 | 28 41 32 29 09 3b 77 72 |.B.#2,27|(A2).;wr|
|000017f0| 69 74 65 2d 6f 6e 6c 79 | 20 70 65 72 6d 69 73 73 |ite-only| permiss|
|00001800| 69 6f 6e 0d 09 4d 4f 56 | 45 2e 4c 09 41 50 42 75 |ion..MOV|E.L.APBu|
|00001810| 66 66 65 72 2c 32 38 28 | 41 32 29 09 3b 70 6f 69 |ffer,28(|A2).;poi|
|00001820| 6e 74 65 72 20 74 6f 20 | 6f 75 72 20 61 63 63 65 |nter to |our acce|
|00001830| 73 73 20 70 61 74 68 20 | 62 75 66 66 65 72 0d 09 |ss path |buffer..|
|00001840| 4d 4f 56 45 2e 4c 09 41 | 32 2c 41 30 0d 09 5f 4f |MOVE.L.A|2,A0.._O|
|00001850| 70 65 6e 09 09 09 3b 6f | 70 65 6e 20 74 68 65 20 |pen...;o|pen the |
|00001860| 64 61 74 61 20 66 6f 72 | 6b 20 6f 66 20 74 68 65 |data for|k of the|
|00001870| 20 66 69 6c 65 0d 09 49 | 73 45 72 72 6f 72 0d 09 | file..I|sError..|
|00001880| 0d 09 4d 4f 56 45 2e 4c | 09 43 6f 6e 76 65 72 74 |..MOVE.L|.Convert|
|00001890| 42 75 66 2c 44 31 09 3b | 47 65 74 20 74 68 65 20 |Buf,D1.;|Get the |
|000018a0| 42 61 73 65 20 61 64 64 | 72 65 73 73 20 6f 66 20 |Base add|ress of |
|000018b0| 74 68 65 20 62 75 66 66 | 65 72 0d 09 53 55 42 2e |the buff|er..SUB.|
|000018c0| 4c 09 44 31 2c 44 32 09 | 09 3b 75 73 65 20 69 74 |L.D1,D2.|.;use it|
|000018d0| 20 74 6f 20 63 61 6c 63 | 75 6c 61 74 65 20 74 68 | to calc|ulate th|
|000018e0| 65 20 6c 65 6e 67 74 68 | 20 6f 66 20 62 75 66 66 |e length| of buff|
|000018f0| 65 72 0d 09 4d 4f 56 45 | 2e 4c 09 43 6f 6e 76 65 |er..MOVE|.L.Conve|
|00001900| 72 74 42 75 66 2c 33 32 | 28 41 32 29 09 3b 42 75 |rtBuf,32|(A2).;Bu|
|00001910| 66 66 65 72 20 70 74 72 | 0d 09 4d 4f 56 45 2e 4c |ffer ptr|..MOVE.L|
|00001920| 09 44 32 2c 33 36 28 41 | 32 29 09 3b 77 72 69 74 |.D2,36(A|2).;writ|
|00001930| 65 20 74 68 65 20 77 68 | 6f 6c 65 20 62 75 66 66 |e the wh|ole buff|
|00001940| 65 72 0d 09 43 4c 52 2e | 57 09 34 34 28 41 32 29 |er..CLR.|W.44(A2)|
|00001950| 09 09 3b 73 74 61 6e 64 | 61 72 64 20 70 6f 73 69 |..;stand|ard posi|
|00001960| 74 69 6f 6e 69 6e 67 0d | 09 43 4c 52 2e 4c 09 34 |tioning.|.CLR.L.4|
|00001970| 36 28 41 32 29 09 09 3b | 77 69 74 68 20 6e 6f 20 |6(A2)..;|with no |
|00001980| 6f 66 66 73 65 74 0d 09 | 4d 4f 56 45 2e 4c 09 41 |offset..|MOVE.L.A|
|00001990| 32 2c 41 30 0d 09 5f 57 | 72 69 74 65 09 09 09 3b |2,A0.._W|rite...;|
|000019a0| 77 72 69 74 65 20 74 68 | 65 20 62 75 66 66 65 72 |write th|e buffer|
|000019b0| 0d 09 49 73 45 72 72 6f | 72 0d 09 0d 09 43 4c 52 |..IsErro|r....CLR|
|000019c0| 2e 57 09 32 38 28 41 32 | 29 09 09 3b 6e 6f 20 64 |.W.28(A2|)..;no d|
|000019d0| 69 72 65 63 74 6f 72 79 | 20 69 6e 64 65 78 0d 09 |irectory| index..|
|000019e0| 4d 4f 56 45 2e 4c 09 41 | 32 2c 41 30 09 09 3b 47 |MOVE.L.A|2,A0..;G|
|000019f0| 65 74 20 74 68 65 20 63 | 75 72 72 65 6e 74 20 66 |et the c|urrent f|
|00001a00| 69 6c 65 20 69 6e 66 6f | 0d 09 5f 47 65 74 46 69 |ile info|.._GetFi|
|00001a10| 6c 65 49 6e 66 6f 09 09 | 3b 73 6f 20 77 65 20 64 |leInfo..|;so we d|
|00001a20| 6f 6e 27 74 20 68 61 76 | 65 20 74 6f 20 73 65 74 |on't hav|e to set|
|00001a30| 20 65 76 65 72 79 74 68 | 69 6e 67 0d 09 4d 4f 56 | everyth|ing..MOV|
|00001a40| 45 2e 4c 09 23 27 54 45 | 58 54 27 2c 33 32 28 41 |E.L.#'TE|XT',32(A|
|00001a50| 32 29 09 3b 66 69 6c 65 | 20 74 79 70 65 20 3d 20 |2).;file| type = |
|00001a60| 54 45 58 54 0d 09 4d 4f | 56 45 2e 4c 09 23 27 45 |TEXT..MO|VE.L.#'E|
|00001a70| 44 49 54 27 2c 33 36 28 | 41 32 29 09 3b 63 72 65 |DIT',36(|A2).;cre|
|00001a80| 61 74 6f 72 20 20 20 3d | 20 45 44 49 54 0d 09 4d |ator   =| EDIT..M|
|00001a90| 4f 56 45 2e 4c 09 41 32 | 2c 41 30 09 09 3b 77 72 |OVE.L.A2|,A0..;wr|
|00001aa0| 69 74 65 20 74 68 65 20 | 69 6e 66 6f 0d 09 5f 53 |ite the |info.._S|
|00001ab0| 65 74 46 69 6c 65 49 6e | 66 6f 0d 09 0d 09 4d 4f |etFileIn|fo....MO|
|00001ac0| 56 45 2e 4c 09 41 32 2c | 41 30 09 09 3b 43 6c 6f |VE.L.A2,|A0..;Clo|
|00001ad0| 73 65 20 6f 75 74 20 74 | 68 65 20 66 69 6c 65 0d |se out t|he file.|
|00001ae0| 09 5f 43 6c 6f 73 65 0d | 09 49 73 45 72 72 6f 72 |._Close.|.IsError|
|00001af0| 0d 09 4d 4f 56 45 2e 4c | 09 41 32 2c 41 30 09 09 |..MOVE.L|.A2,A0..|
|00001b00| 3b 26 20 66 6c 75 73 68 | 20 74 68 65 20 76 6f 6c |;& flush| the vol|
|00001b10| 75 6d 65 0d 09 5f 46 6c | 75 73 68 56 6f 6c 0d 09 |ume.._Fl|ushVol..|
|00001b20| 49 73 45 72 72 6f 72 0d | 09 0d 09 42 52 41 09 4d |IsError.|...BRA.M|
|00001b30| 61 69 6e 0d 0d 49 63 6f | 6e 54 6f 4d 44 53 3a 0d |ain..Ico|nToMDS:.|
|00001b40| 09 4d 4f 56 45 2e 4c 09 | 23 31 35 2c 44 32 09 09 |.MOVE.L.|#15,D2..|
|00001b50| 3b 6c 6f 6f 70 20 31 36 | 20 74 69 6d 65 73 20 28 |;loop 16| times (|
|00001b60| 31 36 20 6c 69 6e 65 73 | 20 6f 66 20 63 6f 64 65 |16 lines| of code|
|00001b70| 29 0d 4e 65 78 74 52 6f | 77 3a 0d 09 4d 4f 56 45 |).NextRo|w:..MOVE|
|00001b80| 2e 4c 09 23 37 2c 44 33 | 09 09 3b 70 75 74 20 38 |.L.#7,D3|..;put 8|
|00001b90| 20 62 79 74 65 73 20 6f | 66 20 64 61 74 61 20 69 | bytes o|f data i|
|00001ba0| 6e 20 65 61 63 68 20 6c | 69 6e 65 0d 09 4d 4f 56 |n each l|ine..MOV|
|00001bb0| 45 2e 4c 09 4c 69 6e 65 | 53 74 61 72 74 2c 28 41 |E.L.Line|Start,(A|
|00001bc0| 32 29 2b 09 3b 50 75 74 | 20 74 68 65 20 27 44 43 |2)+.;Put| the 'DC|
|00001bd0| 2e 42 20 20 27 20 61 74 | 20 74 68 65 20 62 65 67 |.B  ' at| the beg|
|00001be0| 69 6e 6e 69 6e 67 0d 09 | 4d 4f 56 45 2e 42 09 4c |inning..|MOVE.B.L|
|00001bf0| 69 6e 65 53 74 61 72 74 | 2b 34 2c 28 41 32 29 2b |ineStart|+4,(A2)+|
|00001c00| 20 09 3b 6f 66 20 65 61 | 63 68 20 6c 69 6e 65 0d | .;of ea|ch line.|
|00001c10| 40 33 3a 0d 09 4d 4f 56 | 45 2e 42 09 28 41 33 29 |@3:..MOV|E.B.(A3)|
|00001c20| 2b 2c 44 30 09 3b 47 65 | 74 20 6e 65 78 74 20 62 |+,D0.;Ge|t next b|
|00001c30| 79 74 65 20 6f 66 20 64 | 61 74 61 0d 09 42 53 52 |yte of d|ata..BSR|
|00001c40| 09 48 65 78 54 6f 41 73 | 63 69 69 09 3b 67 65 74 |.HexToAs|cii.;get|
|00001c50| 20 61 73 63 69 69 20 77 | 6f 72 64 20 69 6e 20 44 | ascii w|ord in D|
|00001c60| 31 0d 09 4d 4f 56 45 2e | 42 09 23 27 24 27 2c 28 |1..MOVE.|B.#'$',(|
|00001c70| 41 32 29 2b 09 3b 70 72 | 65 63 65 64 65 20 64 69 |A2)+.;pr|ecede di|
|00001c80| 67 69 74 20 77 69 74 68 | 20 24 20 66 6f 72 20 68 |git with| $ for h|
|00001c90| 65 78 0d 09 4d 4f 56 45 | 2e 57 09 44 31 2c 28 41 |ex..MOVE|.W.D1,(A|
|00001ca0| 32 29 2b 09 3b 73 74 6f | 72 65 20 61 73 63 69 69 |2)+.;sto|re ascii|
|00001cb0| 20 65 71 75 69 76 61 6c | 65 6e 74 20 6f 66 20 62 | equival|ent of b|
|00001cc0| 79 74 65 0d 09 4d 4f 56 | 45 2e 42 09 23 27 2c 27 |yte..MOV|E.B.#','|
|00001cd0| 2c 28 41 32 29 2b 09 3b | 73 74 6f 72 65 20 63 6f |,(A2)+.;|store co|
|00001ce0| 6d 6d 61 20 73 65 70 61 | 72 61 74 6f 72 0d 09 44 |mma sepa|rator..D|
|00001cf0| 42 52 41 09 44 33 2c 40 | 33 09 09 3b 6c 6f 6f 70 |BRA.D3,@|3..;loop|
|00001d00| 20 74 69 6c 6c 20 77 65 | 27 76 65 20 64 6f 6e 65 | till we|'ve done|
|00001d10| 20 38 20 62 79 74 65 73 | 0d 09 53 55 42 41 09 23 | 8 bytes|..SUBA.#|
|00001d20| 31 2c 41 32 09 09 3b 72 | 65 70 6c 61 63 65 20 74 |1,A2..;r|eplace t|
|00001d30| 68 65 20 6c 61 73 74 20 | 63 6f 6d 6d 61 20 77 2f |he last |comma w/|
|00001d40| 20 63 72 0d 09 4d 4f 56 | 45 2e 57 09 23 24 32 30 | cr..MOV|E.W.#$20|
|00001d50| 30 44 2c 28 41 32 29 2b | 0d 09 44 42 52 41 09 44 |0D,(A2)+|..DBRA.D|
|00001d60| 32 2c 4e 65 78 74 52 6f | 77 09 3b 6c 6f 6f 70 20 |2,NextRo|w.;loop |
|00001d70| 74 69 6c 6c 20 77 65 27 | 76 65 20 64 6f 6e 65 20 |till we'|ve done |
|00001d80| 31 36 20 6c 69 6e 65 73 | 20 6f 66 20 63 6f 64 65 |16 lines| of code|
|00001d90| 0d 09 52 54 53 0d 09 0d | 3b 20 20 48 65 78 54 6f |..RTS...|;  HexTo|
|00001da0| 41 73 63 69 69 20 72 6f | 75 74 69 6e 65 20 2d 3e |Ascii ro|utine ->|
|00001db0| 20 63 6f 6e 76 65 72 74 | 73 20 61 20 68 65 78 20 | convert|s a hex |
|00001dc0| 62 79 74 65 20 74 6f 20 | 61 6e 20 41 53 43 49 49 |byte to |an ASCII|
|00001dd0| 20 77 6f 72 64 0d 3b 0d | 3b 09 6f 6e 20 65 6e 74 | word.;.|;.on ent|
|00001de0| 72 79 3a 0d 3b 09 09 44 | 30 20 3d 20 48 65 78 20 |ry:.;..D|0 = Hex |
|00001df0| 62 79 74 65 20 74 6f 20 | 62 65 20 63 6f 6e 76 65 |byte to |be conve|
|00001e00| 72 74 65 64 0d 3b 0d 3b | 09 6f 6e 20 72 65 74 75 |rted.;.;|.on retu|
|00001e10| 72 6e 3a 0d 3b 09 09 44 | 31 20 3d 20 41 53 43 49 |rn:.;..D|1 = ASCI|
|00001e20| 49 20 77 6f 72 64 20 72 | 65 73 75 6c 74 0d 3b 0d |I word r|esult.;.|
|00001e30| 3b 09 75 73 65 73 20 44 | 30 2c 44 31 2c 44 34 2c |;.uses D|0,D1,D4,|
|00001e40| 41 30 0d 0d 48 65 78 54 | 6f 41 73 63 69 69 3a 0d |A0..HexT|oAscii:.|
|00001e50| 09 4d 4f 56 45 2e 42 09 | 44 30 2c 44 34 09 09 3b |.MOVE.B.|D0,D4..;|
|00001e60| 73 61 76 65 20 63 6f 70 | 79 20 6f 66 20 62 79 74 |save cop|y of byt|
|00001e70| 65 0d 09 4c 53 52 09 23 | 34 2c 44 30 09 09 3b 47 |e..LSR.#|4,D0..;G|
|00001e80| 65 74 20 74 68 65 20 68 | 69 67 68 20 6e 69 62 62 |et the h|igh nibb|
|00001e90| 6c 65 0d 09 41 4e 44 49 | 09 23 24 30 46 2c 44 30 |le..ANDI|.#$0F,D0|
|00001ea0| 09 09 3b 6d 61 73 6b 20 | 6f 75 74 20 61 6c 6c 20 |..;mask |out all |
|00001eb0| 65 78 74 72 61 6e 65 6f | 75 73 20 62 69 74 73 0d |extraneo|us bits.|
|00001ec0| 09 4c 45 41 09 42 79 74 | 65 54 61 62 6c 65 2c 41 |.LEA.Byt|eTable,A|
|00001ed0| 30 09 3b 47 65 74 20 62 | 61 73 65 20 61 64 64 72 |0.;Get b|ase addr|
|00001ee0| 65 73 73 20 6f 66 20 74 | 61 62 6c 65 0d 09 4d 4f |ess of t|able..MO|
|00001ef0| 56 45 2e 42 09 28 41 30 | 2c 44 30 29 2c 44 31 09 |VE.B.(A0|,D0),D1.|
|00001f00| 3b 4d 6f 76 65 20 31 73 | 74 20 61 73 63 69 69 20 |;Move 1s|t ascii |
|00001f10| 62 79 74 65 20 69 6e 74 | 6f 20 44 31 0d 09 41 53 |byte int|o D1..AS|
|00001f20| 4c 09 23 38 2c 44 31 09 | 09 3b 6d 6f 76 65 20 74 |L.#8,D1.|.;move t|
|00001f30| 68 65 20 62 79 74 65 20 | 74 6f 20 74 68 65 20 70 |he byte |to the p|
|00001f40| 72 6f 70 65 72 20 70 6f | 73 69 74 69 6f 6e 0d 09 |roper po|sition..|
|00001f50| 41 4e 44 49 09 23 24 30 | 46 2c 44 34 09 09 3b 67 |ANDI.#$0|F,D4..;g|
|00001f60| 65 74 20 74 68 65 20 6c | 6f 77 20 6e 69 62 62 6c |et the l|ow nibbl|
|00001f70| 65 0d 09 4d 4f 56 45 2e | 42 09 28 41 30 2c 44 34 |e..MOVE.|B.(A0,D4|
|00001f80| 29 2c 44 30 09 3b 47 65 | 74 20 32 6e 64 20 61 73 |),D0.;Ge|t 2nd as|
|00001f90| 63 69 69 20 62 79 74 65 | 0d 09 4f 52 2e 57 09 44 |cii byte|..OR.W.D|
|00001fa0| 30 2c 44 31 09 09 3b 73 | 74 6f 72 65 20 32 6e 64 |0,D1..;s|tore 2nd|
|00001fb0| 20 62 79 74 65 20 69 6e | 20 77 6f 72 64 0d 09 52 | byte in| word..R|
|00001fc0| 54 53 0d 09 0d 42 79 74 | 65 54 61 62 6c 65 3a 0d |TS...Byt|eTable:.|
|00001fd0| 09 44 43 2e 42 09 27 30 | 31 32 33 34 35 36 37 38 |.DC.B.'0|12345678|
|00001fe0| 39 41 42 43 44 45 46 27 | 0d 09 0d 48 65 6c 70 3a |9ABCDEF'|...Help:|
|00001ff0| 0d 09 43 4c 52 2e 4c 09 | 2d 28 53 50 29 09 09 3b |..CLR.L.|-(SP)..;|
|00002000| 53 61 76 65 20 72 6f 6f | 6d 20 66 6f 72 20 44 49 |Save roo|m for DI|
|00002010| 61 6c 6f 67 50 74 72 0d | 09 4d 4f 56 45 2e 57 09 |alogPtr.|.MOVE.W.|
|00002020| 23 31 32 39 2c 2d 28 53 | 50 29 09 3b 54 68 65 20 |#129,-(S|P).;The |
|00002030| 52 65 73 49 44 20 6f 66 | 20 74 68 65 20 68 65 6c |ResID of| the hel|
|00002040| 70 20 64 69 61 6c 6f 67 | 0d 09 50 45 41 09 48 65 |p dialog|..PEA.He|
|00002050| 6c 70 44 69 61 6c 6f 67 | 28 41 35 29 09 3b 57 68 |lpDialog|(A5).;Wh|
|00002060| 65 72 65 20 74 6f 20 70 | 75 74 20 74 68 65 20 44 |ere to p|ut the D|
|00002070| 69 61 6c 6f 67 52 65 63 | 0d 09 4d 4f 56 45 2e 4c |ialogRec|..MOVE.L|
|00002080| 09 23 2d 31 2c 2d 28 53 | 50 29 09 3b 50 75 74 20 |.#-1,-(S|P).;Put |
|00002090| 69 74 20 69 6e 20 66 72 | 6f 6e 74 2c 20 70 6c 65 |it in fr|ont, ple|
|000020a0| 61 73 65 2e 2e 2e 0d 09 | 5f 47 65 74 4e 65 77 44 |ase.....|_GetNewD|
|000020b0| 69 61 6c 6f 67 0d 09 4c | 45 41 09 48 65 6c 70 44 |ialog..L|EA.HelpD|
|000020c0| 48 61 6e 64 6c 65 2c 41 | 32 09 3b 53 61 76 65 20 |Handle,A|2.;Save |
|000020d0| 68 61 6e 64 6c 65 2c 20 | 62 75 74 20 6b 65 65 70 |handle, |but keep|
|000020e0| 20 69 74 0d 09 4d 4f 56 | 45 2e 4c 09 28 53 50 29 | it..MOV|E.L.(SP)|
|000020f0| 2c 28 41 32 29 09 3b 6f | 6e 20 74 68 65 20 73 74 |,(A2).;o|n the st|
|00002100| 61 63 6b 0d 09 5f 44 72 | 61 77 44 69 61 6c 6f 67 |ack.._Dr|awDialog|
|00002110| 09 09 3b 44 72 61 77 20 | 74 68 65 20 64 69 61 6c |..;Draw |the dial|
|00002120| 6f 67 2e 2e 0d 09 0d 09 | 4c 45 41 09 48 65 6c 70 |og......|LEA.Help|
|00002130| 44 48 61 6e 64 6c 65 2c | 41 32 0d 09 4d 4f 56 45 |DHandle,|A2..MOVE|
|00002140| 2e 4c 09 28 41 32 29 2c | 2d 28 53 50 29 09 3b 53 |.L.(A2),|-(SP).;S|
|00002150| 65 74 20 74 68 65 20 44 | 69 61 6c 6f 67 20 74 6f |et the D|ialog to|
|00002160| 20 74 68 65 20 63 75 72 | 72 65 6e 74 20 47 72 61 | the cur|rent Gra|
|00002170| 66 50 6f 72 74 0d 09 5f | 53 65 74 50 6f 72 74 0d |fPort.._|SetPort.|
|00002180| 09 0d 09 43 65 6e 74 65 | 72 09 54 68 65 20 49 63 |...Cente|r.The Ic|
|00002190| 6f 6e 20 43 6f 6e 76 65 | 72 74 65 72 20 69 73 20 |on Conve|rter is |
|000021a0| 62 61 73 65 64 20 6f 6e | 20 61 6e 20 4d 53 2d 42 |based on| an MS-B|
|000021b0| 61 73 69 63 20 50 72 6f | 67 72 61 6d 2c 32 32 34 |asic Pro|gram,224|
|000021c0| 2c 32 30 0d 09 43 65 6e | 74 65 72 09 77 72 69 74 |,20..Cen|ter.writ|
|000021d0| 74 65 6e 20 62 79 20 44 | 61 76 69 64 20 53 6d 69 |ten by D|avid Smi|
|000021e0| 74 68 20 61 6e 64 20 70 | 72 65 73 65 6e 74 65 64 |th and p|resented|
|000021f0| 20 69 6e 20 4d 61 63 54 | 75 74 6f 72 20 56 6f 6c | in MacT|utor Vol|
|00002200| 2e 20 31 20 23 32 2c 32 | 32 34 2c 33 32 0d 09 43 |. 1 #2,2|24,32..C|
|00002210| 65 6e 74 65 72 09 74 68 | 61 74 20 74 61 6b 65 73 |enter.th|at takes|
|00002220| 20 61 20 66 69 6c 65 20 | 67 65 6e 65 72 61 74 65 | a file |generate|
|00002230| 64 20 62 79 20 74 68 65 | 20 41 70 70 6c 65 20 49 |d by the| Apple I|
|00002240| 63 6f 6e 20 45 64 69 74 | 6f 72 20 61 6e 64 2c 32 |con Edit|or and,2|
|00002250| 32 34 2c 34 34 0d 09 43 | 65 6e 74 65 72 09 63 6f |24,44..C|enter.co|
|00002260| 6e 76 65 72 74 73 20 69 | 74 20 74 6f 20 61 6e 20 |nverts i|t to an |
|00002270| 4d 44 53 20 66 6f 72 6d | 61 74 20 54 45 58 54 20 |MDS form|at TEXT |
|00002280| 74 79 70 65 20 66 69 6c | 65 20 74 6f 20 73 61 76 |type fil|e to sav|
|00002290| 65 20 74 68 65 2c 32 32 | 34 2c 35 36 0d 09 43 65 |e the,22|4,56..Ce|
|000022a0| 6e 74 65 72 09 70 72 6f | 67 72 61 6d 6d 65 72 20 |nter.pro|grammer |
|000022b0| 66 72 6f 6d 20 74 68 65 | 20 74 65 64 69 6f 75 73 |from the| tedious|
|000022c0| 20 74 61 73 6b 20 6f 66 | 20 74 79 70 69 6e 67 20 | task of| typing |
|000022d0| 69 6e 20 74 68 65 20 48 | 45 58 20 64 61 74 61 2c |in the H|EX data,|
|000022e0| 32 32 34 2c 36 38 0d 09 | 43 65 6e 74 65 72 09 62 |224,68..|Center.b|
|000022f0| 79 20 68 61 6e 64 2e 2c | 32 32 34 2c 38 30 0d 09 |y hand.,|224,80..|
|00002300| 43 65 6e 74 65 72 09 54 | 68 69 73 20 70 72 6f 67 |Center.T|his prog|
|00002310| 72 61 6d 20 69 73 20 61 | 6e 20 61 64 61 70 74 61 |ram is a|n adapta|
|00002320| 74 69 6f 6e 20 6f 66 20 | 74 68 65 20 6f 72 69 67 |tion of |the orig|
|00002330| 69 6e 61 6c 2c 32 32 34 | 2c 39 37 0d 09 43 65 6e |inal,224|,97..Cen|
|00002340| 74 65 72 09 49 63 6f 6e | 20 43 6f 6e 76 65 72 74 |ter.Icon| Convert|
|00002350| 65 72 20 69 6e 20 61 73 | 73 65 6d 62 6c 79 20 6c |er in as|sembly l|
|00002360| 61 6e 67 75 61 67 65 2e | 2c 32 32 34 2c 31 30 39 |anguage.|,224,109|
|00002370| 0d 09 0d 09 42 53 52 09 | 41 77 61 69 74 4f 4b 09 |....BSR.|AwaitOK.|
|00002380| 09 3b 77 61 69 74 20 66 | 6f 72 20 74 68 65 20 75 |.;wait f|or the u|
|00002390| 73 65 72 20 74 6f 20 63 | 6c 69 63 6b 20 4f 4b 0d |ser to c|lick OK.|
|000023a0| 09 50 45 41 09 53 63 72 | 65 65 6e 09 09 3b 63 6c |.PEA.Scr|een..;cl|
|000023b0| 65 61 72 20 74 68 65 20 | 64 69 61 6c 6f 67 20 62 |ear the |dialog b|
|000023c0| 6f 78 0d 09 5f 45 72 61 | 73 65 52 65 63 74 0d 09 |ox.._Era|seRect..|
|000023d0| 4d 4f 56 45 2e 4c 09 48 | 65 6c 70 44 48 61 6e 64 |MOVE.L.H|elpDHand|
|000023e0| 6c 65 2c 2d 28 53 50 29 | 09 3b 52 65 64 72 61 77 |le,-(SP)|.;Redraw|
|000023f0| 20 74 68 65 20 64 69 61 | 6c 6f 67 09 0d 09 5f 44 | the dia|log..._D|
|00002400| 72 61 77 44 69 61 6c 6f | 67 09 09 0d 09 0d 09 43 |rawDialo|g......C|
|00002410| 65 6e 74 65 72 09 43 6c | 69 63 6b 69 6e 67 20 69 |enter.Cl|icking i|
|00002420| 6e 20 65 69 74 68 65 72 | 20 6f 66 20 74 68 65 20 |n either| of the |
|00002430| 4f 70 65 6e 20 62 75 74 | 74 6f 6e 73 20 61 6c 6c |Open but|tons all|
|00002440| 6f 77 73 20 74 68 65 20 | 75 73 65 72 20 74 6f 2c |ows the |user to,|
|00002450| 32 32 34 2c 32 30 0d 09 | 43 65 6e 74 65 72 09 6f |224,20..|Center.o|
|00002460| 70 65 6e 20 61 20 66 69 | 6c 65 20 67 65 6e 65 72 |pen a fi|le gener|
|00002470| 61 74 65 64 20 62 79 20 | 74 68 65 20 6f 6c 64 20 |ated by |the old |
|00002480| 69 63 6f 6e 20 65 64 69 | 74 6f 72 20 66 6f 72 20 |icon edi|tor for |
|00002490| 65 69 74 68 65 72 2c 32 | 32 34 2c 33 32 0d 09 43 |either,2|24,32..C|
|000024a0| 65 6e 74 65 72 09 74 68 | 65 20 69 63 6f 6e 20 6f |enter.th|e icon o|
|000024b0| 72 20 6d 61 73 6b 20 72 | 65 73 70 65 63 74 69 76 |r mask r|espectiv|
|000024c0| 65 6c 79 2e 2c 32 32 34 | 2c 34 34 0d 09 43 65 6e |ely.,224|,44..Cen|
|000024d0| 74 65 72 09 43 6c 69 63 | 6b 69 6e 67 20 69 6e 20 |ter.Clic|king in |
|000024e0| 74 68 65 20 4e 6f 6e 65 | 20 62 75 74 74 6f 6e 20 |the None| button |
|000024f0| 74 65 6c 6c 73 20 74 68 | 65 20 49 63 6f 6e 20 45 |tells th|e Icon E|
|00002500| 64 69 74 6f 72 2f 43 6f | 6e 76 65 72 74 65 72 2c |ditor/Co|nverter,|
|00002510| 32 32 34 2c 36 31 0d 09 | 43 65 6e 74 65 72 09 74 |224,61..|Center.t|
|00002520| 6f 20 67 65 6e 65 72 61 | 74 65 20 61 20 73 74 61 |o genera|te a sta|
|00002530| 6e 64 61 72 64 20 6d 61 | 73 6b 20 66 6f 72 20 74 |ndard ma|sk for t|
|00002540| 68 65 20 69 63 6f 6e 20 | 28 61 6c 6c 20 62 6c 61 |he icon |(all bla|
|00002550| 63 6b 29 2e 2c 32 32 34 | 2c 37 33 0d 09 43 65 6e |ck).,224|,73..Cen|
|00002560| 74 65 72 09 43 6c 69 63 | 6b 69 6e 67 20 69 6e 20 |ter.Clic|king in |
|00002570| 74 68 65 20 43 6f 6e 76 | 65 72 74 20 62 75 74 74 |the Conv|ert butt|
|00002580| 6f 6e 20 63 6f 6e 76 65 | 72 74 73 20 74 68 65 20 |on conve|rts the |
|00002590| 64 69 73 70 6c 61 79 65 | 64 20 69 63 6f 6e 2c 32 |displaye|d icon,2|
|000025a0| 32 34 2c 39 30 0d 09 43 | 65 6e 74 65 72 09 61 6e |24,90..C|enter.an|
|000025b0| 64 20 6d 61 73 6b 20 74 | 6f 20 61 6e 20 4d 44 53 |d mask t|o an MDS|
|000025c0| 20 63 6f 6d 70 61 74 61 | 62 6c 65 20 66 69 6c 65 | compata|ble file|
|000025d0| 2e 2c 32 32 34 2c 31 30 | 32 0d 09 0d 09 42 53 52 |.,224,10|2....BSR|
|000025e0| 09 41 77 61 69 74 4f 4b | 09 09 3b 77 61 69 74 20 |.AwaitOK|..;wait |
|000025f0| 66 6f 72 20 74 68 65 20 | 75 73 65 72 20 74 6f 20 |for the |user to |
|00002600| 63 6c 69 63 6b 20 4f 4b | 0d 09 50 45 41 09 53 63 |click OK|..PEA.Sc|
|00002610| 72 65 65 6e 09 09 3b 63 | 6c 65 61 72 20 74 68 65 |reen..;c|lear the|
|00002620| 20 64 69 61 6c 6f 67 20 | 62 6f 78 0d 09 5f 45 72 | dialog |box.._Er|
|00002630| 61 73 65 52 65 63 74 0d | 09 4d 4f 56 45 2e 4c 09 |aseRect.|.MOVE.L.|
|00002640| 48 65 6c 70 44 48 61 6e | 64 6c 65 2c 2d 28 53 50 |HelpDHan|dle,-(SP|
|00002650| 29 09 3b 52 65 64 72 61 | 77 20 74 68 65 20 64 69 |).;Redra|w the di|
|00002660| 61 6c 6f 67 09 0d 09 5f | 44 72 61 77 44 69 61 6c |alog..._|DrawDial|
|00002670| 6f 67 09 09 0d 09 0d 09 | 43 65 6e 74 65 72 09 53 |og......|Center.S|
|00002680| 75 62 73 63 72 69 62 65 | 20 74 6f 20 4d 61 63 54 |ubscribe| to MacT|
|00002690| 75 74 6f 72 20 2d 20 74 | 68 65 20 6e 6f 20 66 6c |utor - t|he no fl|
|000026a0| 75 66 66 20 4d 61 63 69 | 6e 74 6f 73 68 20 70 72 |uff Maci|ntosh pr|
|000026b0| 6f 67 72 61 6d 6d 69 6e | 67 2c 32 32 34 2c 32 30 |ogrammin|g,224,20|
|000026c0| 0d 09 43 65 6e 74 65 72 | 09 6a 6f 75 72 6e 61 6c |..Center|.journal|
|000026d0| 20 2d 20 74 6f 20 6c 65 | 61 72 6e 20 68 6f 77 20 | - to le|arn how |
|000026e0| 74 6f 20 77 72 69 74 65 | 20 70 72 6f 67 72 61 6d |to write| program|
|000026f0| 73 20 6c 69 6b 65 20 74 | 68 69 73 20 69 6e 2c 32 |s like t|his in,2|
|00002700| 32 34 2c 33 32 0d 09 43 | 65 6e 74 65 72 09 41 73 |24,32..C|enter.As|
|00002710| 73 65 6d 62 6c 79 20 4c | 61 6e 67 75 61 67 65 20 |sembly L|anguage |
|00002720| 6f 6e 20 74 68 65 20 4d | 61 63 2e 2c 32 32 34 2c |on the M|ac.,224,|
|00002730| 34 34 0d 09 43 65 6e 74 | 65 72 09 24 32 34 20 70 |44..Cent|er.$24 p|
|00002740| 65 72 20 79 65 61 72 20 | 77 69 6c 6c 20 6b 65 65 |er year |will kee|
|00002750| 70 20 79 6f 75 20 6f 6e | 20 74 6f 70 20 6f 66 20 |p you on| top of |
|00002760| 4d 61 63 69 6e 74 6f 73 | 68 20 70 72 6f 67 72 61 |Macintos|h progra|
|00002770| 6d 6d 69 6e 67 2c 32 32 | 34 2c 36 31 0d 09 43 65 |mming,22|4,61..Ce|
|00002780| 6e 74 65 72 09 69 6e 20 | 41 73 73 65 6d 62 6c 79 |nter.in |Assembly|
|00002790| 20 4c 61 6e 67 75 61 67 | 65 2f 42 61 73 69 63 2f | Languag|e/Basic/|
|000027a0| 43 2f 46 6f 72 74 68 2f | 50 61 73 63 61 6c 20 61 |C/Forth/|Pascal a|
|000027b0| 6e 64 20 6d 61 6e 79 2c | 32 32 34 2c 37 33 0d 09 |nd many,|224,73..|
|000027c0| 43 65 6e 74 65 72 09 6f | 74 68 65 72 20 6c 61 6e |Center.o|ther lan|
|000027d0| 67 75 61 67 65 73 21 2c | 32 32 34 2c 38 35 0d 09 |guages!,|224,85..|
|000027e0| 43 65 6e 74 65 72 09 4d | 61 63 54 75 74 6f 72 20 |Center.M|acTutor |
|000027f0| 20 50 2e 4f 2e 20 42 6f | 78 20 38 34 36 20 20 50 | P.O. Bo|x 846  P|
|00002800| 6c 61 63 65 6e 74 69 61 | 20 43 61 20 20 39 32 36 |lacentia| Ca  926|
|00002810| 37 30 2c 32 32 34 2c 31 | 30 32 0d 09 43 65 6e 74 |70,224,1|02..Cent|
|00002820| 65 72 09 6f 72 20 63 61 | 6c 6c 20 28 37 31 34 29 |er.or ca|ll (714)|
|00002830| 20 39 39 33 2d 39 39 33 | 39 2c 32 32 34 2c 31 31 | 993-993|9,224,11|
|00002840| 39 0d 09 42 53 52 09 41 | 77 61 69 74 4f 4b 0d 09 |9..BSR.A|waitOK..|
|00002850| 4d 4f 56 45 2e 4c 09 48 | 65 6c 70 44 48 61 6e 64 |MOVE.L.H|elpDHand|
|00002860| 6c 65 2c 2d 28 53 50 29 | 09 3b 47 65 74 20 72 69 |le,-(SP)|.;Get ri|
|00002870| 64 20 6f 66 20 74 68 65 | 20 64 69 61 6c 6f 67 0d |d of the| dialog.|
|00002880| 09 5f 44 69 73 70 6f 73 | 44 69 61 6c 6f 67 0d 09 |._Dispos|Dialog..|
|00002890| 4d 4f 56 45 2e 4c 09 4d | 61 69 6e 50 6f 72 74 2c |MOVE.L.M|ainPort,|
|000028a0| 2d 28 53 50 29 09 09 3b | 72 65 73 74 6f 72 65 20 |-(SP)..;|restore |
|000028b0| 74 68 65 20 6d 61 69 6e | 20 70 6f 72 74 0d 09 5f |the main| port.._|
|000028c0| 53 65 74 50 6f 72 74 09 | 09 09 3b 61 73 20 74 68 |SetPort.|..;as th|
|000028d0| 65 20 61 63 74 69 76 65 | 20 70 6f 72 74 0d 09 42 |e active| port..B|
|000028e0| 52 41 09 4d 61 69 6e 0d | 0d 41 77 61 69 74 4f 4b |RA.Main.|.AwaitOK|
|000028f0| 3a 0d 09 43 4c 52 2e 4c | 09 2d 28 53 50 29 09 09 |:..CLR.L|.-(SP)..|
|00002900| 3b 4e 49 4c 20 66 6f 72 | 20 46 69 6c 74 65 72 50 |;NIL for| FilterP|
|00002910| 72 6f 63 0d 09 50 45 41 | 09 49 74 65 6d 48 69 74 |roc..PEA|.ItemHit|
|00002920| 09 09 3b 56 41 52 20 49 | 74 65 6d 48 69 74 0d 09 |..;VAR I|temHit..|
|00002930| 5f 4d 6f 64 61 6c 44 69 | 61 6c 6f 67 0d 09 4d 4f |_ModalDi|alog..MO|
|00002940| 56 45 09 49 74 65 6d 48 | 69 74 2c 44 30 09 3b 47 |VE.ItemH|it,D0.;G|
|00002950| 65 74 20 74 68 65 20 49 | 74 65 6d 20 23 0d 09 43 |et the I|tem #..C|
|00002960| 4d 50 2e 42 09 23 31 2c | 44 30 09 09 3b 77 61 73 |MP.B.#1,|D0..;was|
|00002970| 20 69 74 20 4f 4b 3f 0d | 09 42 4e 45 09 41 77 61 | it OK?.|.BNE.Awa|
|00002980| 69 74 4f 4b 0d 09 52 54 | 53 0d 09 0d 0d 3b 20 52 |itOK..RT|S....; R|
|00002990| 65 61 64 49 63 6f 6e 20 | 72 6f 75 74 69 6e 65 3a |eadIcon |routine:|
|000029a0| 0d 3b 0d 3b 09 6f 6e 20 | 65 6e 74 72 79 20 41 33 |.;.;.on |entry A3|
|000029b0| 20 63 6f 6e 74 61 69 6e | 73 20 61 20 70 74 72 20 | contain|s a ptr |
|000029c0| 74 6f 20 74 68 65 20 62 | 69 74 6d 61 70 20 77 68 |to the b|itmap wh|
|000029d0| 69 63 68 20 77 69 6c 6c | 0d 3b 09 72 65 63 65 69 |ich will|.;.recei|
|000029e0| 76 65 20 74 68 65 20 64 | 61 74 61 2e 0d 0d 52 65 |ve the d|ata...Re|
|000029f0| 61 64 49 63 6f 6e 3a 0d | 09 4d 4f 56 45 2e 4c 09 |adIcon:.|.MOVE.L.|
|00002a00| 49 4f 50 61 72 61 6d 42 | 6c 6f 63 6b 2c 41 32 09 |IOParamB|lock,A2.|
|00002a10| 3b 47 65 74 20 50 74 72 | 20 69 6e 20 41 32 0d 09 |;Get Ptr| in A2..|
|00002a20| 43 4c 52 2e 4c 09 31 32 | 28 41 32 29 09 09 3b 4e |CLR.L.12|(A2)..;N|
|00002a30| 6f 20 63 6f 6d 70 6c 65 | 74 69 6f 6e 20 72 6f 75 |o comple|tion rou|
|00002a40| 74 69 6e 65 0d 09 4c 45 | 41 09 47 46 69 6c 65 4e |tine..LE|A.GFileN|
|00002a50| 61 6d 65 2c 41 30 09 3b | 69 6f 4e 61 6d 65 50 74 |ame,A0.;|ioNamePt|
|00002a60| 72 0d 09 4d 4f 56 45 2e | 4c 09 41 30 2c 31 38 28 |r..MOVE.|L.A0,18(|
|00002a70| 41 32 29 09 3b 73 61 76 | 65 20 69 74 20 69 6e 20 |A2).;sav|e it in |
|00002a80| 49 4f 50 42 0d 09 4d 4f | 56 45 09 47 65 74 56 52 |IOPB..MO|VE.GetVR|
|00002a90| 65 66 2c 32 32 28 41 32 | 29 09 3b 74 68 65 20 76 |ef,22(A2|).;the v|
|00002aa0| 6f 6c 75 6d 65 20 72 65 | 66 4e 75 6d 0d 09 4d 4f |olume re|fNum..MO|
|00002ab0| 56 45 2e 42 09 47 65 74 | 56 65 72 73 2c 32 36 28 |VE.B.Get|Vers,26(|
|00002ac0| 41 32 29 09 3b 74 68 65 | 20 66 69 6c 65 20 76 65 |A2).;the| file ve|
|00002ad0| 72 73 69 6f 6e 20 23 0d | 09 4d 4f 56 45 2e 42 09 |rsion #.|.MOVE.B.|
|00002ae0| 23 31 2c 32 37 28 41 32 | 29 09 3b 72 65 61 64 2d |#1,27(A2|).;read-|
|00002af0| 6f 6e 6c 79 20 70 65 72 | 6d 69 73 73 69 6f 6e 0d |only per|mission.|
|00002b00| 09 4d 4f 56 45 2e 4c 09 | 41 50 42 75 66 66 65 72 |.MOVE.L.|APBuffer|
|00002b10| 2c 32 38 28 41 32 29 09 | 3b 74 68 65 20 61 63 63 |,28(A2).|;the acc|
|00002b20| 65 73 73 20 70 61 74 68 | 20 62 75 66 66 65 72 0d |ess path| buffer.|
|00002b30| 09 4d 4f 56 45 2e 4c 09 | 41 32 2c 41 30 09 09 3b |.MOVE.L.|A2,A0..;|
|00002b40| 50 74 72 20 74 6f 20 49 | 4f 50 42 0d 09 5f 4f 70 |Ptr to I|OPB.._Op|
|00002b50| 65 6e 09 09 09 3b 4f 70 | 65 6e 20 74 68 65 20 66 |en...;Op|en the f|
|00002b60| 69 6c 65 0d 09 49 73 45 | 72 72 6f 72 09 09 09 3b |ile..IsE|rror...;|
|00002b70| 68 61 6e 64 6c 65 20 61 | 6e 79 20 65 72 72 6f 72 |handle a|ny error|
|00002b80| 0d 09 0d 09 4d 4f 56 45 | 2e 4c 09 28 41 33 29 2c |....MOVE|.L.(A3),|
|00002b90| 33 32 28 41 32 29 09 3b | 64 61 74 61 20 62 75 66 |32(A2).;|data buf|
|00002ba0| 66 65 72 0d 09 4d 4f 56 | 45 2e 4c 09 23 31 32 38 |fer..MOV|E.L.#128|
|00002bb0| 2c 33 36 28 41 32 29 09 | 3b 23 20 6f 66 20 62 79 |,36(A2).|;# of by|
|00002bc0| 74 65 73 20 74 6f 20 72 | 65 61 64 0d 09 43 4c 52 |tes to r|ead..CLR|
|00002bd0| 2e 57 09 34 34 28 41 32 | 29 09 09 3b 73 74 61 6e |.W.44(A2|)..;stan|
|00002be0| 64 61 72 64 20 70 6f 73 | 69 74 69 6f 6e 69 6e 67 |dard pos|itioning|
|00002bf0| 0d 09 43 4c 52 2e 4c 09 | 34 36 28 41 32 29 09 09 |..CLR.L.|46(A2)..|
|00002c00| 3b 6e 6f 20 6f 66 66 73 | 65 74 0d 09 5f 52 65 61 |;no offs|et.._Rea|
|00002c10| 64 09 09 09 3b 72 65 61 | 64 20 74 68 65 20 64 61 |d...;rea|d the da|
|00002c20| 74 61 0d 09 49 73 45 72 | 72 6f 72 09 09 09 3b 68 |ta..IsEr|ror...;h|
|00002c30| 6f 70 65 20 66 6f 72 20 | 6e 6f 20 65 72 72 6f 72 |ope for |no error|
|00002c40| 73 0d 09 0d 09 4d 4f 56 | 45 2e 4c 09 41 32 2c 41 |s....MOV|E.L.A2,A|
|00002c50| 30 09 09 3b 63 6c 6f 73 | 65 20 74 68 65 20 66 69 |0..;clos|e the fi|
|00002c60| 6c 65 0d 09 5f 43 6c 6f | 73 65 0d 09 49 73 45 72 |le.._Clo|se..IsEr|
|00002c70| 72 6f 72 0d 09 52 54 53 | 0d 09 0d 47 65 74 46 69 |ror..RTS|...GetFi|
|00002c80| 6c 65 3a 0d 09 4d 4f 56 | 45 2e 57 09 23 38 32 2c |le:..MOV|E.W.#82,|
|00002c90| 2d 28 53 50 29 09 3b 78 | 20 43 6f 6f 72 64 69 6e |-(SP).;x| Coordin|
|00002ca0| 61 74 65 0d 09 4d 4f 56 | 45 2e 57 09 23 31 38 37 |ate..MOV|E.W.#187|
|00002cb0| 2c 2d 28 53 50 29 09 3b | 79 20 43 6f 6f 72 64 69 |,-(SP).;|y Coordi|
|00002cc0| 6e 61 74 65 0d 09 50 45 | 41 09 27 50 52 4f 4d 50 |nate..PE|A.'PROMP|
|00002cd0| 54 27 09 3b 50 72 6f 6d | 70 74 20 28 55 6e 75 73 |T'.;Prom|pt (Unus|
|00002ce0| 65 64 29 0d 09 4d 4f 56 | 45 2e 4c 09 23 30 2c 2d |ed)..MOV|E.L.#0,-|
|00002cf0| 28 53 50 29 09 3b 4e 49 | 4c 20 66 6f 72 20 50 72 |(SP).;NI|L for Pr|
|00002d00| 6f 63 50 74 72 0d 09 4d | 4f 56 45 2e 57 09 23 31 |ocPtr..M|OVE.W.#1|
|00002d10| 2c 2d 28 53 50 29 09 3b | 57 65 20 6f 6e 6c 79 20 |,-(SP).;|We only |
|00002d20| 77 61 6e 74 20 31 20 66 | 69 6c 65 20 74 79 70 65 |want 1 f|ile type|
|00002d30| 20 6c 69 73 74 65 64 0d | 09 50 45 41 09 54 79 70 | listed.|.PEA.Typ|
|00002d40| 65 4c 69 73 74 09 3b 54 | 68 65 20 54 79 70 65 4c |eList.;T|he TypeL|
|00002d50| 69 73 74 0d 09 4d 4f 56 | 45 2e 4c 09 23 30 2c 2d |ist..MOV|E.L.#0,-|
|00002d60| 28 53 50 29 09 3b 4e 49 | 4c 20 66 6f 72 20 64 6c |(SP).;NI|L for dl|
|00002d70| 67 48 6f 6f 6b 0d 09 50 | 45 41 09 53 46 52 65 70 |gHook..P|EA.SFRep|
|00002d80| 6c 79 09 09 3b 54 68 65 | 20 52 65 70 6c 79 20 52 |ly..;The| Reply R|
|00002d90| 65 63 6f 72 64 0d 09 4d | 4f 56 45 2e 57 09 23 32 |ecord..M|OVE.W.#2|
|00002da0| 2c 2d 28 53 50 29 09 3b | 52 6f 75 74 69 6e 65 20 |,-(SP).;|Routine |
|00002db0| 53 65 6c 65 63 74 6f 72 | 20 66 6f 72 20 53 46 47 |Selector| for SFG|
|00002dc0| 65 74 46 69 6c 65 0d 09 | 5f 50 61 63 6b 33 0d 09 |etFile..|_Pack3..|
|00002dd0| 0d 09 4c 45 41 09 53 46 | 52 65 70 6c 79 2c 41 30 |..LEA.SF|Reply,A0|
|00002de0| 09 3b 63 68 65 63 6b 20 | 66 6f 72 20 73 75 63 63 |.;check |for succ|
|00002df0| 65 73 73 66 75 6c 20 63 | 61 6c 6c 0d 09 43 4d 50 |essful c|all..CMP|
|00002e00| 2e 42 09 23 30 2c 28 41 | 30 29 0d 09 52 54 53 0d |.B.#0,(A|0)..RTS.|
|00002e10| 09 0d 50 75 74 46 69 6c | 65 3a 0d 09 4d 4f 56 45 |..PutFil|e:..MOVE|
|00002e20| 2e 57 09 23 31 30 34 2c | 2d 28 53 50 29 09 3b 78 |.W.#104,|-(SP).;x|
|00002e30| 20 63 6f 6f 72 64 69 6e | 61 74 65 0d 09 4d 4f 56 | coordin|ate..MOV|
|00002e40| 45 2e 57 09 23 31 39 30 | 2c 2d 28 53 50 29 09 3b |E.W.#190|,-(SP).;|
|00002e50| 79 20 63 6f 6f 72 64 69 | 6e 61 74 65 0d 09 50 45 |y coordi|nate..PE|
|00002e60| 41 09 27 53 61 76 65 20 | 4d 44 53 20 66 69 6c 65 |A.'Save |MDS file|
|00002e70| 20 61 73 3a 27 09 3b 50 | 72 6f 6d 70 74 0d 09 50 | as:'.;P|rompt..P|
|00002e80| 45 41 09 27 55 6e 74 69 | 74 6c 65 64 2e 49 43 4f |EA.'Unti|tled.ICO|
|00002e90| 4e 27 09 3b 44 65 66 61 | 75 6c 74 20 6e 61 6d 65 |N'.;Defa|ult name|
|00002ea0| 0d 09 43 4c 52 2e 4c 09 | 2d 28 53 50 29 09 09 3b |..CLR.L.|-(SP)..;|
|00002eb0| 73 74 61 6e 64 61 72 64 | 20 64 69 61 6c 6f 67 20 |standard| dialog |
|00002ec0| 62 6f 78 0d 09 50 45 41 | 09 53 46 52 65 70 6c 79 |box..PEA|.SFReply|
|00002ed0| 09 09 3b 74 68 65 20 72 | 65 70 6c 79 20 72 65 63 |..;the r|eply rec|
|00002ee0| 6f 72 64 0d 09 4d 4f 56 | 45 2e 57 09 23 31 2c 2d |ord..MOV|E.W.#1,-|
|00002ef0| 28 53 50 29 09 3b 52 6f | 75 74 69 6e 65 20 73 65 |(SP).;Ro|utine se|
|00002f00| 6c 65 63 74 6f 72 20 66 | 6f 72 20 53 46 50 75 74 |lector f|or SFPut|
|00002f10| 46 69 6c 65 0d 09 5f 50 | 61 63 6b 33 0d 09 0d 09 |File.._P|ack3....|
|00002f20| 4c 45 41 09 53 46 52 65 | 70 6c 79 2c 41 30 09 3b |LEA.SFRe|ply,A0.;|
|00002f30| 63 68 65 63 6b 20 66 6f | 72 20 73 75 63 63 65 73 |check fo|r succes|
|00002f40| 73 66 75 6c 20 63 61 6c | 6c 0d 09 43 4d 50 2e 42 |sful cal|l..CMP.B|
|00002f50| 09 23 30 2c 28 41 30 29 | 0d 09 52 54 53 0d 09 0d |.#0,(A0)|..RTS...|
|00002f60| 50 6c 6f 74 49 63 6f 6e | 3a 0d 09 50 45 41 09 43 |PlotIcon|:..PEA.C|
|00002f70| 75 72 50 6f 72 74 09 09 | 3b 67 65 74 20 74 68 65 |urPort..|;get the|
|00002f80| 20 47 72 61 66 50 74 72 | 20 69 6e 20 43 75 72 50 | GrafPtr| in CurP|
|00002f90| 6f 72 74 0d 09 5f 47 65 | 74 50 6f 72 74 0d 09 4d |ort.._Ge|tPort..M|
|00002fa0| 4f 56 45 2e 4c 09 43 75 | 72 50 6f 72 74 2c 41 30 |OVE.L.Cu|rPort,A0|
|00002fb0| 09 3b 70 75 74 20 69 74 | 20 69 6e 20 41 30 0d 09 |.;put it| in A0..|
|00002fc0| 50 45 41 09 49 63 6f 6e | 42 69 74 4d 61 70 09 3b |PEA.Icon|BitMap.;|
|00002fd0| 73 6f 75 72 63 65 0d 09 | 50 45 41 09 32 28 41 30 |source..|PEA.2(A0|
|00002fe0| 29 09 09 3b 64 65 73 74 | 0d 09 50 45 41 09 53 6f |)..;dest|..PEA.So|
|00002ff0| 75 72 63 65 52 65 63 74 | 09 3b 73 6f 75 72 63 65 |urceRect|.;source|
|00003000| 20 72 65 63 74 0d 09 50 | 45 41 09 49 63 6f 6e 52 | rect..P|EA.IconR|
|00003010| 65 63 74 09 3b 64 65 73 | 74 20 72 65 63 74 0d 09 |ect.;des|t rect..|
|00003020| 43 4c 52 2e 57 09 2d 28 | 53 50 29 09 09 3b 53 72 |CLR.W.-(|SP)..;Sr|
|00003030| 63 43 6f 70 79 20 6d 6f | 64 65 0d 09 43 4c 52 2e |cCopy mo|de..CLR.|
|00003040| 4c 09 2d 28 53 50 29 09 | 09 3b 6e 6f 20 6d 61 73 |L.-(SP).|.;no mas|
|00003050| 6b 20 72 65 67 69 6f 6e | 0d 09 5f 43 6f 70 79 42 |k region|.._CopyB|
|00003060| 69 74 73 0d 09 52 54 53 | 0d 09 0d 50 6c 6f 74 4d |its..RTS|...PlotM|
|00003070| 61 73 6b 3a 0d 09 50 45 | 41 09 43 75 72 50 6f 72 |ask:..PE|A.CurPor|
|00003080| 74 09 09 3b 67 65 74 20 | 74 68 65 20 47 72 61 66 |t..;get |the Graf|
|00003090| 50 74 72 20 69 6e 20 43 | 75 72 50 6f 72 74 0d 09 |Ptr in C|urPort..|
|000030a0| 5f 47 65 74 50 6f 72 74 | 0d 09 4d 4f 56 45 2e 4c |_GetPort|..MOVE.L|
|000030b0| 09 43 75 72 50 6f 72 74 | 2c 41 30 09 3b 70 75 74 |.CurPort|,A0.;put|
|000030c0| 20 69 74 20 69 6e 20 41 | 30 0d 09 50 45 41 09 4d | it in A|0..PEA.M|
|000030d0| 61 73 6b 42 69 74 4d 61 | 70 09 3b 73 6f 75 72 63 |askBitMa|p.;sourc|
|000030e0| 65 0d 09 50 45 41 09 32 | 28 41 30 29 09 09 3b 64 |e..PEA.2|(A0)..;d|
|000030f0| 65 73 74 0d 09 50 45 41 | 09 53 6f 75 72 63 65 52 |est..PEA|.SourceR|
|00003100| 65 63 74 09 3b 73 6f 75 | 72 63 65 20 72 65 63 74 |ect.;sou|rce rect|
|00003110| 0d 09 50 45 41 09 4d 61 | 73 6b 52 65 63 74 09 3b |..PEA.Ma|skRect.;|
|00003120| 64 65 73 74 20 72 65 63 | 74 0d 09 43 4c 52 2e 57 |dest rec|t..CLR.W|
|00003130| 09 2d 28 53 50 29 09 09 | 3b 53 72 63 43 6f 70 79 |.-(SP)..|;SrcCopy|
|00003140| 20 6d 6f 64 65 0d 09 43 | 4c 52 2e 4c 09 2d 28 53 | mode..C|LR.L.-(S|
|00003150| 50 29 09 09 3b 6e 6f 20 | 6d 61 73 6b 20 72 65 67 |P)..;no |mask reg|
|00003160| 69 6f 6e 0d 09 5f 43 6f | 70 79 42 69 74 73 0d 09 |ion.._Co|pyBits..|
|00003170| 52 54 53 0d 09 0d 3b d9 | d9 d9 d9 d9 d9 d9 d9 d9 |RTS...;.|........|
|00003180| d9 d9 d9 d9 d9 d9 d9 d9 | d9 20 50 72 6f 67 72 61 |........|. Progra|
|00003190| 6d 20 56 61 72 69 61 62 | 6c 65 73 20 d9 d9 d9 d9 |m Variab|les ....|
|000031a0| d9 d9 d9 d9 d9 d9 d9 d9 | d9 d9 d9 d9 d9 d9 d9 d9 |........|........|
|000031b0| d9 0d 0d 53 61 76 65 52 | 65 67 73 3a 09 44 43 42 |...SaveR|egs:.DCB|
|000031c0| 2e 4c 09 32 2c 30 09 3b | 46 6f 72 20 73 61 76 69 |.L.2,0.;|For savi|
|000031d0| 6e 67 20 74 68 65 20 53 | 50 20 65 74 63 2e 2e 0d |ng the S|P etc...|
|000031e0| 0d 4d 61 69 6e 44 48 61 | 6e 64 6c 65 3a 09 44 43 |.MainDHa|ndle:.DC|
|000031f0| 2e 4c 09 30 09 3b 46 6f | 72 20 74 68 65 20 6d 61 |.L.0.;Fo|r the ma|
|00003200| 69 6e 20 64 69 61 6c 6f | 67 20 48 61 6e 64 6c 65 |in dialo|g Handle|
|00003210| 0d 48 65 6c 70 44 48 61 | 6e 64 6c 65 3a 09 44 43 |.HelpDHa|ndle:.DC|
|00003220| 2e 4c 09 30 09 3b 46 6f | 72 20 74 68 65 20 48 65 |.L.0.;Fo|r the He|
|00003230| 6c 70 20 64 69 61 6c 6f | 67 20 48 61 6e 64 6c 65 |lp dialo|g Handle|
|00003240| 0d 45 72 72 44 48 61 6e | 64 6c 65 3a 09 44 43 2e |.ErrDHan|dle:.DC.|
|00003250| 4c 09 30 09 3b 46 6f 72 | 20 74 68 65 20 69 6f 45 |L.0.;For| the ioE|
|00003260| 72 72 20 64 69 61 6c 6f | 67 20 48 61 6e 64 6c 65 |rr dialo|g Handle|
|00003270| 0d 49 74 65 6d 48 69 74 | 3a 09 44 43 2e 57 09 30 |.ItemHit|:.DC.W.0|
|00003280| 09 3b 46 6f 72 20 5f 4d | 6f 64 61 6c 44 69 61 6c |.;For _M|odalDial|
|00003290| 6f 67 0d 0d 49 4f 50 61 | 72 61 6d 42 6c 6f 63 6b |og..IOPa|ramBlock|
|000032a0| 3a 09 44 43 2e 4c 09 30 | 0d 41 50 42 75 66 66 65 |:.DC.L.0|.APBuffe|
|000032b0| 72 3a 09 44 43 2e 4c 09 | 30 0d 43 75 72 50 6f 72 |r:.DC.L.|0.CurPor|
|000032c0| 74 3a 09 44 43 2e 4c 09 | 30 0d 4d 61 69 6e 50 6f |t:.DC.L.|0.MainPo|
|000032d0| 72 74 3a 09 44 43 2e 4c | 09 30 0d 43 6f 6e 76 65 |rt:.DC.L|.0.Conve|
|000032e0| 72 74 42 75 66 3a 09 44 | 43 2e 4c 09 30 0d 0d 49 |rtBuf:.D|C.L.0..I|
|000032f0| 63 6f 6e 46 72 61 6d 65 | 3a 09 44 43 2e 57 09 36 |conFrame|:.DC.W.6|
|00003300| 30 2c 31 35 34 2c 39 36 | 2c 31 39 30 0d 4d 61 73 |0,154,96|,190.Mas|
|00003310| 6b 46 72 61 6d 65 3a 09 | 44 43 2e 57 09 36 30 2c |kFrame:.|DC.W.60,|
|00003320| 32 31 30 2c 39 36 2c 32 | 34 36 0d 53 6f 75 72 63 |210,96,2|46.Sourc|
|00003330| 65 52 65 63 74 3a 09 44 | 43 2e 57 09 30 2c 30 2c |eRect:.D|C.W.0,0,|
|00003340| 33 32 2c 33 32 0d 49 63 | 6f 6e 52 65 63 74 3a 09 |32,32.Ic|onRect:.|
|00003350| 44 43 2e 57 09 36 32 2c | 31 35 36 2c 39 34 2c 31 |DC.W.62,|156,94,1|
|00003360| 38 38 0d 4d 61 73 6b 52 | 65 63 74 3a 09 44 43 2e |88.MaskR|ect:.DC.|
|00003370| 57 09 36 32 2c 32 31 32 | 2c 39 34 2c 32 34 34 0d |W.62,212|,94,244.|
|00003380| 53 63 72 65 65 6e 3a 09 | 09 44 43 2e 57 09 30 2c |Screen:.|.DC.W.0,|
|00003390| 30 2c 33 34 32 2c 35 31 | 32 0d 0d 54 79 70 65 4c |0,342,51|2..TypeL|
|000033a0| 69 73 74 3a 09 44 43 2e | 4c 09 30 2c 30 0d 0d 2e |ist:.DC.|L.0,0...|
|000033b0| 41 4c 49 47 4e 20 32 0d | 4c 69 6e 65 53 74 61 72 |ALIGN 2.|LineStar|
|000033c0| 74 3a 09 44 43 2e 42 09 | 27 44 43 2e 42 09 27 0d |t:.DC.B.|'DC.B.'.|
|000033d0| 0d 3b d9 d9 d9 d9 d9 d9 | d9 d9 d9 d9 d9 d9 d9 d9 |.;......|........|
|000033e0| d9 d9 d9 d9 d9 d9 d9 d9 | d9 20 42 69 74 4d 61 70 |........|. BitMap|
|000033f0| 73 20 d9 d9 d9 d9 d9 d9 | d9 d9 d9 d9 d9 d9 d9 d9 |s ......|........|
|00003400| d9 d9 d9 d9 d9 d9 d9 d9 | d9 d9 d9 0d 0d 49 63 6f |........|.....Ico|
|00003410| 6e 42 69 74 4d 61 70 3a | 09 44 43 2e 4c 09 30 09 |nBitMap:|.DC.L.0.|
|00003420| 09 3b 42 61 73 65 41 64 | 64 72 0d 09 09 44 43 2e |.;BaseAd|dr...DC.|
|00003430| 57 09 34 09 09 3b 52 6f | 77 42 79 74 65 73 0d 09 |W.4..;Ro|wBytes..|
|00003440| 09 44 43 2e 57 09 30 2c | 30 2c 33 32 2c 33 32 09 |.DC.W.0,|0,32,32.|
|00003450| 3b 42 6f 75 6e 64 73 0d | 09 09 0d 4d 61 73 6b 42 |;Bounds.|...MaskB|
|00003460| 69 74 4d 61 70 3a 09 44 | 43 2e 4c 09 30 09 09 3b |itMap:.D|C.L.0..;|
|00003470| 42 61 73 65 41 64 64 72 | 0d 09 09 44 43 2e 57 09 |BaseAddr|...DC.W.|
|00003480| 34 09 09 3b 52 6f 77 42 | 79 74 65 73 0d 09 09 44 |4..;RowB|ytes...D|
|00003490| 43 2e 57 09 30 2c 30 2c | 33 32 2c 33 32 09 3b 42 |C.W.0,0,|32,32.;B|
|000034a0| 6f 75 6e 64 73 0d 09 09 | 0d 3b d9 d9 d9 d9 d9 d9 |ounds...|.;......|
|000034b0| d9 d9 d9 d9 d9 d9 d9 d9 | d9 d9 d9 d9 d9 d9 20 44 |........|...... D|
|000034c0| 69 61 6c 6f 67 20 52 65 | 63 6f 72 64 20 d9 d9 d9 |ialog Re|cord ...|
|000034d0| d9 d9 d9 d9 d9 d9 d9 d9 | d9 d9 d9 d9 d9 d9 d9 d9 |........|........|
|000034e0| d9 d9 d9 0d 0d 4d 61 69 | 6e 44 69 61 6c 6f 67 3a |.....Mai|nDialog:|
|000034f0| 09 44 53 2e 57 09 44 57 | 69 6e 64 4c 65 6e 0d 48 |.DS.W.DW|indLen.H|
|00003500| 65 6c 70 44 69 61 6c 6f | 67 3a 09 44 53 2e 57 09 |elpDialo|g:.DS.W.|
|00003510| 44 57 69 6e 64 4c 65 6e | 0d 45 72 72 44 69 61 6c |DWindLen|.ErrDial|
|00003520| 6f 67 3a 09 44 53 2e 57 | 09 44 57 69 6e 64 4c 65 |og:.DS.W|.DWindLe|
|00003530| 6e 0d 0d 3b d9 d9 d9 d9 | d9 d9 d9 d9 d9 d9 d9 d9 |n..;....|........|
|00003540| d9 d9 d9 d9 20 53 74 61 | 6e 64 61 72 64 20 46 69 |.... Sta|ndard Fi|
|00003550| 6c 65 20 52 65 70 6c 79 | 20 52 65 63 6f 72 64 73 |le Reply| Records|
|00003560| 20 d9 d9 d9 d9 d9 d9 d9 | d9 d9 d9 d9 d9 d9 d9 d9 | .......|........|
|00003570| d9 d9 d9 d9 d9 0d 0d 53 | 46 52 45 50 4c 59 3a 09 |.......S|FREPLY:.|
|00003580| 44 43 2e 42 09 30 2c 30 | 09 09 3b 67 6f 6f 64 2c |DC.B.0,0|..;good,|
|00003590| 20 63 6f 70 79 0d 09 09 | 44 43 2e 4c 09 27 54 59 | copy...|DC.L.'TY|
|000035a0| 50 45 27 09 09 3b 66 54 | 79 70 65 0d 47 45 54 56 |PE'..;fT|ype.GETV|
|000035b0| 52 45 46 3a 09 44 43 2e | 57 09 30 09 09 3b 76 52 |REF:.DC.|W.0..;vR|
|000035c0| 65 66 4e 75 6d 0d 47 45 | 54 56 45 52 53 3a 09 44 |efNum.GE|TVERS:.D|
|000035d0| 43 2e 57 09 30 09 09 3b | 76 65 72 73 69 6f 6e 0d |C.W.0..;|version.|
|000035e0| 47 46 49 4c 45 4e 41 4d | 45 3a 09 44 43 42 2e 42 |GFILENAM|E:.DCB.B|
|000035f0| 09 36 33 2c 30 0d 0d 3b | d9 d9 d9 d9 d9 d9 d9 d9 |.63,0..;|........|
|00003600| d9 d9 d9 d9 d9 d9 d9 d9 | d9 d9 d9 d9 20 50 61 74 |........|.... Pat|
|00003610| 74 65 72 6e 20 44 65 66 | 69 6e 69 74 69 6f 6e 73 |tern Def|initions|
|00003620| 20 d9 d9 d9 d9 d9 d9 d9 | d9 d9 d9 d9 d9 d9 d9 d9 | .......|........|
|00003630| d9 0d 2e 41 4c 49 47 4e | 09 32 0d 47 72 61 79 50 |...ALIGN|.2.GrayP|
|00003640| 61 74 3a 09 44 43 2e 42 | 09 24 41 41 2c 24 35 35 |at:.DC.B|.$AA,$55|
|00003650| 2c 24 41 41 2c 24 35 35 | 2c 24 41 41 2c 24 35 35 |,$AA,$55|,$AA,$55|
|00003660| 2c 24 41 41 2c 24 35 35 | 0d 57 68 69 74 65 50 61 |,$AA,$55|.WhitePa|
|00003670| 74 3a 09 44 43 2e 42 09 | 30 2c 30 2c 30 2c 30 2c |t:.DC.B.|0,0,0,0,|
|00003680| 30 2c 30 2c 30 2c 30 0d | 0d 00 00 00 00 00 00 00 |0,0,0,0.|........|
|00003690| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000036a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000036b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000036c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000036d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000036e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000036f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003700| 00 00 01 00 00 00 01 16 | 00 00 00 16 00 00 00 d4 |........|........|
|00003710| 6d b6 6d b6 6d b6 6d b6 | 6d b6 6d b6 6d b6 6d b6 |m.m.m.m.|m.m.m.m.|
|00003720| 6d b6 6d b6 6d b6 6d b6 | 6d b6 6d b6 6d b6 6d b6 |m.m.m.m.|m.m.m.m.|
|00003730| 0c 49 63 6f 6e 56 65 72 | 74 2e 41 53 4d 72 02 00 |.IconVer|t.ASMr..|
|00003740| 00 00 54 45 58 54 45 44 | 49 54 01 00 00 00 00 00 |..TEXTED|IT......|
|00003750| 00 00 54 45 58 54 45 44 | 49 54 01 00 00 00 00 00 |..TEXTED|IT......|
|00003760| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003770| 00 00 99 7c 48 3f 00 00 | 36 09 00 00 01 ea 6d b6 |...|H?..|6.....m.|
|00003780| 6d b6 6d b6 6d b6 6d b6 | 6d b6 6d b6 6d b6 6d b6 |m.m.m.m.|m.m.m.m.|
|00003790| 6d b6 6d b6 6d b6 6d b6 | 6d b6 6d b6 6d b6 6d b6 |m.m.m.m.|m.m.m.m.|
|000037a0| 6d b6 6d b6 6d b6 6d b6 | 6d b6 6d b6 6d b6 6d b6 |m.m.m.m.|m.m.m.m.|
|000037b0| 6d b6 6d b6 6d b6 6d b6 | 6d b6 6d b6 6d b6 6d b6 |m.m.m.m.|m.m.m.m.|
|000037c0| 6d b6 6d b6 6d b6 6d b6 | 6d b6 6d b6 6d b6 6d b6 |m.m.m.m.|m.m.m.m.|
|000037d0| 6d b6 6d b6 6d b6 6d b6 | 6d b6 6d b6 6d b6 6d b6 |m.m.m.m.|m.m.m.m.|
|000037e0| 6d b6 6d b6 6d b6 6d b6 | 6d b6 6d b6 6d b6 6d b6 |m.m.m.m.|m.m.m.m.|
|000037f0| 6d b6 6d b6 6d b6 6d b6 | 6d b6 6d b6 6d b6 6d b6 |m.m.m.m.|m.m.m.m.|
|00003800| 00 00 00 0a 00 09 06 4d | 6f 6e 61 63 6f ff 00 00 |.......M|onaco...|
|00003810| 00 04 00 06 00 08 00 00 | 01 00 00 00 01 16 00 00 |........|........|
|00003820| 00 16 00 00 00 d4 00 00 | 4e 1c 00 7a 00 00 00 1c |........|N..z....|
|00003830| 00 46 00 01 45 46 4e 54 | 00 00 00 12 45 54 41 42 |.F..EFNT|....ETAB|
|00003840| 00 00 00 1e 03 eb 00 00 | 00 00 00 00 00 00 e2 54 |........|.......T|
|00003850| 03 ec 00 47 00 00 00 0e | 00 00 e2 50 46 4f 42 4a |...G....|...PFOBJ|
|00003860| ff ff ff ff 00 40 01 aa | 00 40 01 ac 00 40 01 ae |.....@..|.@...@..|
|00003870| 00 40 01 b0 00 40 01 b2 | 00 40 01 b4 00 40 01 b6 |.@...@..|.@...@..|
|00003880| 00 40 01 b8 00 40 10 18 | 00 40 01 bc 00 40 01 be |.@...@..|.@...@..|
|00003890| 00 40 01 be 00 40 01 be | 00 40 01 be 00 40 01 be |.@...@..|.@...@..|
|000038a0| 00 40 01 46 4f 42 4a ff | ff ff ff 00 40 01 aa 00 |.@.FOBJ.|....@...|
|000038b0| 40 01 ac 00 40 01 ae 00 | 40 01 b0 00 40 01 b2 00 |@...@...|@...@...|
|000038c0| 40 01 b4 00 40 01 b6 00 | 40 01 b8 00 40 10 18 00 |@...@...|@...@...|
|000038d0| 40 01 bc 00 40 01 be 00 | 40 01 be 00 40 01 be 00 |@...@...|@...@...|
|000038e0| 40 01 be 00 40 01 be 00 | 40 01 00 00 00 00 00 00 |@...@...|@.......|
|000038f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+